Midpoint on a great circle

Time bar (total: 19.1s)

start0.0ms (0%)

Memory
0.1MiB live, 0.1MiB allocated

analyze649.0ms (3.4%)

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

Compiled 22 to 16 computations (27.3% saved)

sample4.6s (24.1%)

Memory
-1.0MiB live, 7 379.7MiB allocated
Samples
3.3s4 384×1valid
747.0ms3 866×0valid
3.0ms2valid
Precisions
Click to see histograms. Total time spent on operations: 3.5s
ival-cos: 2.1s (60.1% of total)
ival-sin: 485.0ms (13.8% of total)
ival-atan2: 284.0ms (8.1% of total)
adjust: 219.0ms (6.2% of total)
ival-mult: 186.0ms (5.3% of total)
ival-add: 123.0ms (3.5% of total)
ival-sub: 90.0ms (2.6% of total)
ival-true: 7.0ms (0.2% of total)
ival-assert: 4.0ms (0.1% of total)
Bogosity

explain490.0ms (2.6%)

Memory
25.0MiB live, 899.4MiB allocated
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
76124(-4.3429504658622206e-46 2.9164828536905493e+283 1.1267498705727342e+66 -2.8929989942410116e+187)0-(sin.f64 (-.f64 lambda1 lambda2))
76125(-4.3429504658622206e-46 2.9164828536905493e+283 1.1267498705727342e+66 -2.8929989942410116e+187)0-(cos.f64 (-.f64 lambda1 lambda2))
80-2(-7.271573214696528e-185 -2.5636595304984384e-105 -4.0042670045506184e+160 -1.1699083545061493e+181)(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
00-0-lambda2
00-0-phi1
00-0-(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
00-0-phi2
00-0-(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
00-0-(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
00-0-(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
00-0-(-.f64 lambda1 lambda2)
00-0-lambda1
00-0-(cos.f64 phi2)
00-0-(cos.f64 phi1)
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
cos.f64(cos.f64 (-.f64 lambda1 lambda2))sensitivity2010
sin.f64(sin.f64 (-.f64 lambda1 lambda2))sensitivity2001
+.f64(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))cancellation53
Confusion
Predicted +Predicted -
+111
-19450
Precision
0.05365853658536585
Recall
0.9166666666666666
Confusion?
Predicted +Predicted MaybePredicted -
+1110
-194050
Precision?
0.05825242718446602
Recall?
1.0
Freqs
test
numberfreq
051
15
2199
31
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
299.0ms374×1valid
21.0ms136×0valid
1.0ms2valid
Compiler

Compiled 186 to 46 computations (75.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 254.0ms
ival-cos: 160.0ms (62.9% of total)
ival-sin: 31.0ms (12.2% of total)
adjust: 18.0ms (7.1% of total)
ival-atan2: 18.0ms (7.1% of total)
ival-mult: 13.0ms (5.1% of total)
ival-add: 9.0ms (3.5% of total)
ival-sub: 5.0ms (2% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

preprocess134.0ms (0.7%)

Memory
-1.4MiB live, 122.7MiB allocated
Algorithm
egg-herbie
Rules
498×unsub-neg
446×sub-neg
412×distribute-lft-neg-in
336×lower-fma.f64
336×lower-fma.f32
Iterations

Useful iterations: 0 (0.0ms)

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

(abs phi2)

(abs phi1)

Compiler

Compiled 20 to 14 computations (30% saved)

eval0.0ms (0%)

Memory
0.6MiB live, 0.6MiB allocated
Compiler

Compiled 0 to 4 computations (-∞% saved)

prune1.0ms (0%)

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

Compiled 20 to 14 computations (30% saved)

simplify25.0ms (0.1%)

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

Found 4 expressions of interest:

NewMetricScoreProgram
cost-diff0
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
cost-diff0
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
cost-diff128
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
Rules
336×lower-fma.f64
336×lower-fma.f32
224×lower-*.f32
220×lower-*.f64
120×lower-+.f32
Iterations

Useful iterations: 0 (0.0ms)

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

localize163.0ms (0.9%)

Memory
3.7MiB live, 193.1MiB allocated
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
accuracy0.1875
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
accuracy0.6840469398631684
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
accuracy16.289586540653364
(sin.f64 (-.f64 lambda1 lambda2))
accuracy16.340220638258632
(cos.f64 (-.f64 lambda1 lambda2))
Samples
111.0ms187×1valid
14.0ms68×0valid
1.0ms2valid
Compiler

Compiled 83 to 16 computations (80.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 108.0ms
ival-cos: 61.0ms (56.4% of total)
ival-sin: 15.0ms (13.9% of total)
ival-atan2: 11.0ms (10.2% of total)
adjust: 8.0ms (7.4% of total)
ival-mult: 6.0ms (5.5% of total)
ival-add: 4.0ms (3.7% of total)
ival-sub: 2.0ms (1.8% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series23.0ms (0.1%)

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

12 calls:

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

simplify183.0ms (1%)

Memory
11.2MiB live, 157.9MiB allocated
Algorithm
egg-herbie
Rules
14 730×lower-fma.f64
14 730×lower-fma.f32
4 846×lower-*.f64
4 846×lower-*.f32
4 090×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

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

rewrite200.0ms (1%)

Memory
13.3MiB live, 204.4MiB allocated
Rules
5 196×lower-fma.f64
5 196×lower-fma.f32
4 860×lower-*.f32
4 856×lower-*.f64
3 186×lower-/.f64
Iterations

Useful iterations: 0 (0.0ms)

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

eval101.0ms (0.5%)

Memory
-38.0MiB live, 133.2MiB allocated
Compiler

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

prune77.0ms (0.4%)

Memory
6.3MiB live, 208.5MiB allocated
Pruning

47 alts after pruning (47 fresh and 0 done)

PrunedKeptTotal
New41047457
Fresh000
Picked101
Done000
Total41147458
Accuracy
99.0%
Counts
458 → 47
Alt Table
Click to see full alt table
StatusAccuracyProgram
75.2%
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
43.7%
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 6 binary64)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 6 binary64))) (*.f64 (fma.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (*.f64 lambda1 lambda1)) (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)))))
60.0%
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (*.f64 lambda1 lambda1)))
98.3%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)))
91.0%
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (sin.f64 (+.f64 lambda2 lambda1)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
94.8%
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
73.0%
(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
98.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (+.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
98.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
91.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
94.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (+.f64 lambda2 lambda1)) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
98.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
94.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
93.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (neg.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))))
93.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (neg.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))))
93.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))))))
93.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
93.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 6 binary64))) (*.f64 (fma.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)))))))
93.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))))
93.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
93.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (*.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) (fma.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))))
98.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
98.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
93.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))))
34.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))))))))
98.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))))))
98.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))))
97.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
93.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #s(literal -1 binary64))))))
93.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))))
98.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))))
78.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
97.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 lambda2) (sin.f64 lambda2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))))
77.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
97.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (cos.f64 phi1)))))
97.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
76.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
76.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
97.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
97.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
63.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
89.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
75.4%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
76.4%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
59.5%
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))) (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)))) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1)))
75.0%
(*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)))
98.4%
(*.f64 (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal -1 binary64))))
Compiler

Compiled 4 148 to 1 972 computations (52.5% saved)

simplify248.0ms (1.3%)

Memory
1.1MiB live, 191.1MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(cos.f64 phi2)
cost-diff0
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
cost-diff0
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))))
cost-diff0
(*.f64 (cos.f64 phi2) (-.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)))))))
cost-diff0
(atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
cost-diff128
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
cost-diff0
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
cost-diff0
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
cost-diff0
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
cost-diff1408
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)))
cost-diff0
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
cost-diff0
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
cost-diff0
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
cost-diff128
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
cost-diff0
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
cost-diff0
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
cost-diff128
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
Rules
11 498×lower-fma.f32
11 492×lower-fma.f64
4 148×lower-*.f32
4 124×lower-*.f64
1 484×lower-+.f32
Iterations

Useful iterations: 4 (0.0ms)

IterNodesCost
066899
0122896
1192896
2325896
3711896
41739886
53104886
65105886
76624886
87473886
97558886
107583886
117588886
08001886
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(cos.f64 phi2)
phi2
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(sin.f64 lambda2)
lambda2
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(cos.f64 lambda2)
(sin.f64 lambda1)
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
lambda1
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda2
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 phi2)
phi2
(cos.f64 (-.f64 lambda1 lambda2))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)))
#s(literal 1 binary64)
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(cos.f64 phi2)
phi2
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
(cos.f64 phi1)
phi1
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi2) (-.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)))))))
(cos.f64 phi2)
phi2
(-.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 (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))))
(sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1))))
(*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))
(/.f64 lambda1 (+.f64 lambda2 lambda1))
(+.f64 lambda2 lambda1)
lambda2
(cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))
(*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))
(/.f64 lambda2 (+.f64 lambda2 lambda1))
(*.f64 (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))))
(cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1))))
(sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))))
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(cos.f64 phi2)
phi2
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda2
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64)))
(pow.f64 (cos.f64 phi1) #s(literal 4 binary64))
(cos.f64 phi1)
phi1
#s(literal 4 binary64)
(pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
(*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))
(pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))
#s(literal 2 binary64)
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(cos.f64 phi2)
phi2
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(sin.f64 lambda2)
lambda2
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(cos.f64 lambda2)
(sin.f64 lambda1)
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda1 lambda2)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
lambda1
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda2
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(cos.f64 phi2)
phi2
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
#s(literal 1 binary64)
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(cos.f64 phi2)
phi2
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
(cos.f64 phi1)
phi1
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 (*.f64 (/.f64 lambda2 (+.f64 lambda2 lambda1)) lambda2))) (cos.f64 (*.f64 (/.f64 lambda1 (+.f64 lambda2 lambda1)) lambda1)) (*.f64 (cos.f64 (*.f64 (/.f64 lambda2 (+.f64 lambda2 lambda1)) lambda2)) (sin.f64 (*.f64 (/.f64 lambda1 (+.f64 lambda2 lambda1)) lambda1)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 (*.f64 (/.f64 lambda2 (+.f64 lambda2 lambda1)) lambda2))) (cos.f64 (*.f64 (/.f64 lambda1 (+.f64 lambda2 lambda1)) lambda1)) (*.f64 (cos.f64 (*.f64 (/.f64 lambda2 (+.f64 lambda2 lambda1)) lambda2)) (sin.f64 (*.f64 (/.f64 lambda1 (+.f64 lambda2 lambda1)) lambda1)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (fma.f64 (neg.f64 (sin.f64 (*.f64 (/.f64 lambda2 (+.f64 lambda2 lambda1)) lambda2))) (cos.f64 (*.f64 (/.f64 lambda1 (+.f64 lambda2 lambda1)) lambda1)) (*.f64 (cos.f64 (*.f64 (/.f64 lambda2 (+.f64 lambda2 lambda1)) lambda2)) (sin.f64 (*.f64 (/.f64 lambda1 (+.f64 lambda2 lambda1)) lambda1)))) (cos.f64 phi2))
(cos.f64 phi2)
phi2
(-.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))))))
(fma.f64 (neg.f64 (sin.f64 (*.f64 (/.f64 lambda2 (+.f64 lambda2 lambda1)) lambda2))) (cos.f64 (*.f64 (/.f64 lambda1 (+.f64 lambda2 lambda1)) lambda1)) (*.f64 (cos.f64 (*.f64 (/.f64 lambda2 (+.f64 lambda2 lambda1)) lambda2)) (sin.f64 (*.f64 (/.f64 lambda1 (+.f64 lambda2 lambda1)) lambda1))))
(*.f64 (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))))
(*.f64 (cos.f64 (*.f64 (/.f64 lambda2 (+.f64 lambda2 lambda1)) lambda2)) (sin.f64 (*.f64 (/.f64 lambda1 (+.f64 lambda2 lambda1)) lambda1)))
(sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1))))
(sin.f64 (*.f64 (/.f64 lambda1 (+.f64 lambda2 lambda1)) lambda1))
(*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))
(*.f64 (/.f64 lambda1 (+.f64 lambda2 lambda1)) lambda1)
(/.f64 lambda1 (+.f64 lambda2 lambda1))
(+.f64 lambda2 lambda1)
lambda2
(cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))
(cos.f64 (*.f64 (/.f64 lambda2 (+.f64 lambda2 lambda1)) lambda2))
(*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))
(*.f64 (/.f64 lambda2 (+.f64 lambda2 lambda1)) 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 (sin.f64 (*.f64 (/.f64 lambda2 (+.f64 lambda2 lambda1)) lambda2)) (cos.f64 (*.f64 (/.f64 lambda1 (+.f64 lambda2 lambda1)) lambda1)))
(cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1))))
(cos.f64 (*.f64 (/.f64 lambda1 (+.f64 lambda2 lambda1)) lambda1))
(sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))
(sin.f64 (*.f64 (/.f64 lambda2 (+.f64 lambda2 lambda1)) lambda2))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda1 lambda2)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))) lambda1)
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(cos.f64 phi2)
phi2
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda2
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64)))
(pow.f64 (cos.f64 phi1) #s(literal 4 binary64))
(cos.f64 phi1)
phi1
#s(literal 4 binary64)
(pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
(*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))
(*.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))
(pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))
#s(literal 2 binary64)

localize670.0ms (3.5%)

Memory
23.7MiB live, 663.4MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy3.028084139757084
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64)))
accuracy3.1043932179960367
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
accuracy16.289586540653364
(sin.f64 (-.f64 lambda1 lambda2))
accuracy16.340220638258632
(cos.f64 (-.f64 lambda2 lambda1))
accuracy11.68739479770834
(cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))
accuracy11.936269871724297
(sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1))))
accuracy12.42280489260228
(cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1))))
accuracy16.340220638258632
(cos.f64 (-.f64 lambda1 lambda2))
accuracy0.1953125
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)))
accuracy0.6902163820819227
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
accuracy16.289586540653364
(sin.f64 (-.f64 lambda1 lambda2))
accuracy16.340220638258632
(cos.f64 (-.f64 lambda2 lambda1))
accuracy0.6840469398631684
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
accuracy16.289586540653364
(sin.f64 (-.f64 lambda1 lambda2))
accuracy16.340220638258632
(cos.f64 (-.f64 lambda1 lambda2))
accuracy31.072960778952577
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
accuracy0.1875
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
accuracy0.21875
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
accuracy0.6840469398631684
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
accuracy16.340220638258632
(cos.f64 (-.f64 lambda1 lambda2))
Samples
546.0ms202×1valid
34.0ms51×0valid
6.0ms2valid
Compiler

Compiled 900 to 65 computations (92.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 525.0ms
ival-cos: 168.0ms (32% of total)
ival-add: 114.0ms (21.7% of total)
ival-sin: 71.0ms (13.5% of total)
ival-mult: 45.0ms (8.6% of total)
adjust: 36.0ms (6.9% of total)
ival-atan2: 36.0ms (6.9% of total)
ival-div: 22.0ms (4.2% of total)
ival-pow: 17.0ms (3.2% of total)
ival-sub: 10.0ms (1.9% of total)
ival-pow2: 4.0ms (0.8% of total)
ival-neg: 2.0ms (0.4% of total)
exact: 1.0ms (0.2% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

series268.0ms (1.4%)

Memory
-9.2MiB live, 309.5MiB allocated
Counts
28 → 1 092
Calls
Call 1
Inputs
#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())
#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())
#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())
#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())
#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())
#s(alt (*.f64 (cos.f64 phi2) (-.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))))))) (patch (*.f64 (cos.f64 phi2) (-.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))))))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())
#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())
#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())
#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())
#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())
#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())
#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())
#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())
#s(alt (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())
#s(alt (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())
#s(alt (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())
#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())
#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())
Outputs
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi2) (sin lambda2))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ lambda1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2))) (/ 1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (- (/ lambda1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 3)) (/ 1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2)))) (/ 1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (- (* lambda1 (+ (* -1 (/ lambda1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 4))) (/ 1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 3)))) (/ 1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2)))) (/ 1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi2) (sin lambda2))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (-.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))))))) (patch (*.f64 (cos.f64 phi2) (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (-.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))))))) (patch (*.f64 (cos.f64 phi2) (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (-.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))))))) (patch (*.f64 (cos.f64 phi2) (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* 1/2 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos phi2) (- (* -1 (/ (cos lambda2) (pow lambda2 2))) (* (cos lambda2) (- 1/6 (/ 1 (pow lambda2 2))))))))) (* (cos lambda2) (cos phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (-.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))))))) (patch (*.f64 (cos.f64 phi2) (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda2)) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (cos lambda2)) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (cos lambda2) (* -1/6 (* (pow lambda1 2) (cos lambda2))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* 1/120 (* (pow lambda1 2) (cos lambda2))))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (cos lambda2))) (* 1/120 (cos lambda2)))))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (neg lambda2)) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2))))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos lambda2) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (sin lambda2))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda2) (cos phi2))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 lambda1) (#s(alt (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (/ (pow lambda1 4) (pow lambda2 2)))) (taylor 0 lambda1) (#s(alt (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow lambda1 4) (- (/ lambda1 (pow lambda2 3)) (* 1/2 (/ 1 (pow lambda2 2)))))) (taylor 0 lambda1) (#s(alt (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow lambda1 4) (- (* lambda1 (+ (* -3/2 (/ lambda1 (pow lambda2 4))) (/ 1 (pow lambda2 3)))) (* 1/2 (/ 1 (pow lambda2 2)))))) (taylor 0 lambda1) (#s(alt (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow lambda1 2) lambda2) (taylor 0 lambda1) (#s(alt (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ (* -1 (/ lambda1 (pow lambda2 2))) (/ 1 lambda2))) (taylor 0 lambda1) (#s(alt (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ (* lambda1 (- (/ lambda1 (pow lambda2 3)) (/ 1 (pow lambda2 2)))) (/ 1 lambda2))) (taylor 0 lambda1) (#s(alt (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ (* lambda1 (- (* lambda1 (+ (* -1 (/ lambda1 (pow lambda2 4))) (/ 1 (pow lambda2 3)))) (/ 1 (pow lambda2 2)))) (/ 1 lambda2))) (taylor 0 lambda1) (#s(alt (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos lambda2) (taylor 0 lambda1) (#s(alt (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (sin lambda2))) (taylor 0 lambda1) (#s(alt (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (- (* lambda1 (- (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda2))) (* -1 (sin lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (- (* lambda1 (- (+ (* -1/2 (cos lambda2)) (* lambda1 (- (/ (cos lambda2) lambda2) (* (sin lambda2) (- 1/6 (/ 1 (pow lambda2 2))))))) (/ (sin lambda2) lambda2))) (* -1 (sin lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos lambda2) (cos phi2))) (taylor 0 lambda1) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos phi1) (* -1 (* lambda1 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2))) (taylor 0 lambda1) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos phi1) (* lambda1 (- (* 1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2))) (taylor 0 lambda1) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos phi1) (* lambda1 (- (* lambda1 (- (* 1/6 (* lambda1 (* (cos phi2) (sin lambda2)))) (* -1/2 (* (cos lambda2) (cos phi2))))) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2))) (taylor 0 lambda1) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos lambda2) 4) (pow (cos phi2) 4))) (taylor 0 lambda1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -4 (* lambda1 (* (pow (cos lambda2) 3) (* (pow (cos phi2) 4) (sin lambda2))))) (pow (cos phi1) 4)) (* (pow (cos lambda2) 4) (pow (cos phi2) 4))) (taylor 0 lambda1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda1 (- (* -1 (* lambda1 (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))) (* 4 (* (pow (cos lambda2) 2) (pow (sin lambda2) 2))))))) (* 4 (* (pow (cos lambda2) 3) (* (pow (cos phi2) 4) (sin lambda2)))))) (pow (cos phi1) 4)) (* (pow (cos lambda2) 4) (pow (cos phi2) 4))) (taylor 0 lambda1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda2) 2) (+ (* -1 (* (cos lambda2) (sin lambda2))) (* -1/3 (* (cos lambda2) (sin lambda2)))))) (* 4 (* (cos lambda2) (* (sin lambda2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))))))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))) (* 4 (* (pow (cos lambda2) 2) (pow (sin lambda2) 2))))))) (* 4 (* (pow (cos lambda2) 3) (* (pow (cos phi2) 4) (sin lambda2)))))) (pow (cos phi1) 4)) (* (pow (cos lambda2) 4) (pow (cos phi2) 4))) (taylor 0 lambda1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1))) (taylor inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1))) (taylor inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1))) (taylor inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ 1 lambda1) (taylor inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1))) lambda1) (taylor inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ 1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2) (pow lambda1 2))) (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)) lambda1) (taylor inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ 1 (* -1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 3) (pow lambda1 3)))) (+ (* -1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2) (pow lambda1 2))) (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1))) lambda1) (taylor inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (-.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))))))) (patch (*.f64 (cos.f64 phi2) (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))) lambda1)) (* (cos phi2) (sin (/ (pow lambda1 2) (+ lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (-.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))))))) (patch (*.f64 (cos.f64 phi2) (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))) lambda1)) (+ (* (cos phi2) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (/ (* (cos phi2) (- (* -1/2 (* (pow lambda2 4) (sin (/ (pow lambda1 2) (+ lambda1 lambda2))))) (* -1 (* (pow lambda2 3) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))))) (pow lambda1 2)))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (-.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))))))) (patch (*.f64 (cos.f64 phi2) (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))) lambda1)) (+ (* (cos phi2) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (+ (/ (* (cos phi2) (- (* -1/2 (* (pow lambda2 4) (sin (/ (pow lambda1 2) (+ lambda1 lambda2))))) (* -1 (* (pow lambda2 3) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))))) (pow lambda1 2)) (/ (* (cos phi2) (- (* (pow lambda2 5) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (+ (* -1/6 (pow lambda2 6)) (pow lambda2 4))))) (pow lambda1 3))))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (-.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))))))) (patch (*.f64 (cos.f64 phi2) (-.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))))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (taylor inf lambda1) (#s(alt (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (taylor inf lambda1) (#s(alt (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (taylor inf lambda1) (#s(alt (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (taylor inf lambda1) (#s(alt (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (pow lambda1 2) (+ lambda1 lambda2))) (taylor inf lambda1) (#s(alt (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (pow lambda1 2) (+ lambda1 lambda2))) (taylor inf lambda1) (#s(alt (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (pow lambda1 2) (+ lambda1 lambda2))) (taylor inf lambda1) (#s(alt (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (pow lambda1 2) (+ lambda1 lambda2))) (taylor inf lambda1) (#s(alt (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf lambda1) (#s(alt (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (/ (pow lambda2 4) (pow lambda1 2)))) (taylor inf lambda1) (#s(alt (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (/ (pow lambda2 4) (pow lambda1 2))) (/ (pow lambda2 5) (pow lambda1 3)))) (taylor inf lambda1) (#s(alt (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (pow lambda2 6) (pow lambda1 4))) (+ (* -1/2 (/ (pow lambda2 4) (pow lambda1 2))) (+ (* -1/2 (/ (pow lambda2 6) (pow lambda1 4))) (+ (* 1/24 (/ (pow lambda2 8) (pow lambda1 4))) (/ (pow lambda2 5) (pow lambda1 3))))))) (taylor inf lambda1) (#s(alt (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor inf lambda1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor inf lambda1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor inf lambda1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor inf lambda1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ 1 lambda1) (taylor -inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1) 1) lambda1)) (taylor -inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* -1 (/ (- (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) 2) lambda1) (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))) lambda1)) 1) lambda1)) (taylor -inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) 3) lambda1) (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) 2)) lambda1)) (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))) lambda1)) 1) lambda1)) (taylor -inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (-.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))))))) (patch (*.f64 (cos.f64 phi2) (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) lambda1)) (* (cos phi2) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (-.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))))))) (patch (*.f64 (cos.f64 phi2) (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (+ (* -1 (/ (* (cos phi2) (- (* -1/2 (* (pow lambda2 4) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) (* -1 (* (pow lambda2 3) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))))) lambda1)) (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))) lambda1)) (* (cos phi2) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (-.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))))))) (patch (*.f64 (cos.f64 phi2) (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (cos phi2) (- (* -1 (* (pow lambda2 5) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (+ (* -1 (pow lambda2 4)) (* 1/6 (pow lambda2 6)))))) lambda1)) (* (cos phi2) (- (* -1/2 (* (pow lambda2 4) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) (* -1 (* (pow lambda2 3) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))))) lambda1)) (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))) lambda1)) (* (cos phi2) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (-.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))))))) (patch (*.f64 (cos.f64 phi2) (-.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))))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf lambda1) (#s(alt (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (/ (pow lambda2 4) (pow lambda1 2)))) (taylor -inf lambda1) (#s(alt (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (/ (pow lambda2 4) (pow lambda1 2))) (/ (pow lambda2 5) (pow lambda1 3)))) (taylor -inf lambda1) (#s(alt (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda2 6)) (+ (* -1/2 (pow lambda2 6)) (* 1/24 (pow lambda2 8)))) lambda1)) (* -1 (pow lambda2 5))) (pow lambda1 3))) (* -1/2 (/ (pow lambda2 4) (pow lambda1 2))))) (taylor -inf lambda1) (#s(alt (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (taylor -inf lambda1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (taylor -inf lambda1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (taylor -inf lambda1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (taylor -inf lambda1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda2) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda2) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda2) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda2) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (-.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))))))) (patch (*.f64 (cos.f64 phi2) (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (-.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))))))) (patch (*.f64 (cos.f64 phi2) (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (-.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))))))) (patch (*.f64 (cos.f64 phi2) (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* lambda2 (* (cos phi2) (- (* (cos lambda1) (- 1/6 (/ 1 (pow lambda1 2)))) (* -1 (/ (cos lambda1) (pow lambda1 2)))))))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (-.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))))))) (patch (*.f64 (cos.f64 phi2) (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos lambda1) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (sin lambda1))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1/2 (* (pow lambda2 2) (sin lambda1)))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* 1/24 (* (pow lambda2 2) (sin lambda1)))))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (sin lambda1))) (* 1/24 (sin lambda1))))))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1)))))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1)))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda1)) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* -1 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* (cos phi2) (cos (neg lambda1))))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1))))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi2) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi2) (sin (neg lambda1))))))))) (* (cos phi2) (cos (neg lambda1))))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos lambda1) (taylor 0 lambda2) (#s(alt (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (sin lambda1))) (taylor 0 lambda2) (#s(alt (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* lambda2 (- (* -1/2 (cos lambda1)) (/ (sin lambda1) lambda1))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* lambda2 (- (+ (* -1/2 (cos lambda1)) (* lambda2 (- (/ (cos lambda1) lambda1) (* (sin lambda1) (- 1/6 (/ 1 (pow lambda1 2))))))) (/ (sin lambda1) lambda1))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (/ (cos lambda1) lambda1)))))) (taylor 0 lambda2) (#s(alt (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (+ (* lambda2 (+ (* (cos lambda1) (- 1/6 (/ 1 (pow lambda1 2)))) (/ (sin lambda1) lambda1))) (/ (cos lambda1) lambda1))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 lambda2) (#s(alt (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (/ (pow lambda2 4) (pow lambda1 2)))) (taylor 0 lambda2) (#s(alt (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow lambda2 4) (- (/ lambda2 (pow lambda1 3)) (* 1/2 (/ 1 (pow lambda1 2)))))) (taylor 0 lambda2) (#s(alt (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow lambda2 4) (- (* lambda2 (+ (* -3/2 (/ lambda2 (pow lambda1 4))) (/ 1 (pow lambda1 3)))) (* 1/2 (/ 1 (pow lambda1 2)))))) (taylor 0 lambda2) (#s(alt (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (taylor 0 lambda2) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos phi1) (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* (cos phi2) (cos (neg lambda1)))) (taylor 0 lambda2) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos phi1) (* lambda2 (- (* 1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))) (* -1 (* (cos phi2) (sin (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1)))) (taylor 0 lambda2) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos phi1) (* lambda2 (- (* lambda2 (- (* -1/6 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* -1/2 (* (cos phi2) (cos (neg lambda1)))))) (* -1 (* (cos phi2) (sin (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1)))) (taylor 0 lambda2) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg lambda1)) 4))) (taylor 0 lambda2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 4 (* lambda2 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda1)) 3) (sin (neg lambda1)))))) (pow (cos phi1) 4)) (* (pow (cos phi2) 4) (pow (cos (neg lambda1)) 4))) (taylor 0 lambda2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda2 (- (* -1 (* lambda2 (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda1)) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2)))) (* 4 (* (pow (cos (neg lambda1)) 2) (pow (sin (neg lambda1)) 2))))))) (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda1)) 3) (sin (neg lambda1))))))) (pow (cos phi1) 4)) (* (pow (cos phi2) 4) (pow (cos (neg lambda1)) 4))) (taylor 0 lambda2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda1)) (* (sin (neg lambda1)) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2))))) (* 2 (* (pow (cos (neg lambda1)) 2) (+ (* 1/3 (* (cos (neg lambda1)) (sin (neg lambda1)))) (* (cos (neg lambda1)) (sin (neg lambda1)))))))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda1)) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2)))) (* 4 (* (pow (cos (neg lambda1)) 2) (pow (sin (neg lambda1)) 2))))))) (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda1)) 3) (sin (neg lambda1))))))) (pow (cos phi1) 4)) (* (pow (cos phi2) 4) (pow (cos (neg lambda1)) 4))) (taylor 0 lambda2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf lambda2) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf lambda2) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf lambda2) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf lambda2) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (-.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))))))) (patch (*.f64 (cos.f64 phi2) (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (/ (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) lambda2)) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (-.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))))))) (patch (*.f64 (cos.f64 phi2) (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (+ (/ (* (cos phi2) (- (* -1 (* (pow lambda1 3) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) (* -1/2 (* (pow lambda1 4) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))) (pow lambda2 2)) (/ (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (-.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))))))) (patch (*.f64 (cos.f64 phi2) (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (+ (/ (* (cos phi2) (- (* -1 (* (pow lambda1 3) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) (* -1/2 (* (pow lambda1 4) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))) (pow lambda2 2)) (+ (/ (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (+ (* -1/6 (pow lambda1 6)) (pow lambda1 4))) (* (pow lambda1 5) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (pow lambda2 3)) (/ (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (-.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))))))) (patch (*.f64 (cos.f64 phi2) (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf lambda2) (#s(alt (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (/ (pow lambda1 4) (pow lambda2 2)))) (taylor inf lambda2) (#s(alt (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))) (/ (pow lambda1 5) (pow lambda2 3)))) (taylor inf lambda2) (#s(alt (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (pow lambda1 6) (pow lambda2 4))) (+ (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))) (+ (* -1/2 (/ (pow lambda1 6) (pow lambda2 4))) (+ (* 1/24 (/ (pow lambda1 8) (pow lambda2 4))) (/ (pow lambda1 5) (pow lambda2 3))))))) (taylor inf lambda2) (#s(alt (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow lambda1 2) lambda2) (taylor inf lambda2) (#s(alt (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (pow lambda1 3) lambda2)) (pow lambda1 2)) lambda2) (taylor inf lambda2) (#s(alt (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (pow lambda1 3) lambda2)) (+ (* -1/6 (/ (pow lambda1 6) (pow lambda2 2))) (+ (/ (pow lambda1 4) (pow lambda2 2)) (pow lambda1 2)))) lambda2) (taylor inf lambda2) (#s(alt (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (pow lambda1 3) lambda2)) (+ (* -1 (/ (pow lambda1 5) (pow lambda2 3))) (+ (* -1/6 (/ (pow lambda1 6) (pow lambda2 2))) (+ (* 1/2 (/ (pow lambda1 7) (pow lambda2 3))) (+ (/ (pow lambda1 4) (pow lambda2 2)) (pow lambda1 2)))))) lambda2) (taylor inf lambda2) (#s(alt (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (taylor inf lambda2) (#s(alt (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (taylor inf lambda2) (#s(alt (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (taylor inf lambda2) (#s(alt (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (taylor inf lambda2) (#s(alt (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda2) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda2) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda2) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda2) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor inf lambda2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor inf lambda2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor inf lambda2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor inf lambda2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))) (taylor -inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))) (taylor -inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))) (taylor -inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))) (taylor -inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (-.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))))))) (patch (*.f64 (cos.f64 phi2) (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (/ (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) lambda2)) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (-.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))))))) (patch (*.f64 (cos.f64 phi2) (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (* -1 (/ (+ (* -1 (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (* -1 (/ (* (cos phi2) (- (* -1 (* (pow lambda1 3) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (* -1/2 (* (pow lambda1 4) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))))) lambda2))) lambda2))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (-.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))))))) (patch (*.f64 (cos.f64 phi2) (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (* -1 (/ (+ (* -1 (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (* -1 (/ (+ (* -1 (/ (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (+ (* -1 (pow lambda1 4)) (* 1/6 (pow lambda1 6)))) (* -1 (* (pow lambda1 5) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))))) lambda2)) (* (cos phi2) (- (* -1 (* (pow lambda1 3) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (* -1/2 (* (pow lambda1 4) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))))) lambda2))) lambda2))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (-.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))))))) (patch (*.f64 (cos.f64 phi2) (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf lambda2) (#s(alt (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (/ (pow lambda1 4) (pow lambda2 2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))) (/ (pow lambda1 5) (pow lambda2 3)))) (taylor -inf lambda2) (#s(alt (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda1 6)) (+ (* -1/2 (pow lambda1 6)) (* 1/24 (pow lambda1 8)))) lambda2)) (* -1 (pow lambda1 5))) (pow lambda2 3))) (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))))) (taylor -inf lambda2) (#s(alt (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow lambda1 2) lambda2) (taylor -inf lambda2) (#s(alt (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1 (pow lambda1 2)) (/ (pow lambda1 3) lambda2)) lambda2)) (taylor -inf lambda2) (#s(alt (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda1 4)) (* 1/6 (pow lambda1 6))) lambda2)) (* -1 (pow lambda1 3))) lambda2)) (* -1 (pow lambda1 2))) lambda2)) (taylor -inf lambda2) (#s(alt (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda1 5)) (* 1/2 (pow lambda1 7))) lambda2)) (+ (* -1 (pow lambda1 4)) (* 1/6 (pow lambda1 6)))) lambda2)) (* -1 (pow lambda1 3))) lambda2)) (* -1 (pow lambda1 2))) lambda2)) (taylor -inf lambda2) (#s(alt (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (taylor -inf lambda2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (taylor -inf lambda2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (taylor -inf lambda2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (taylor -inf lambda2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2))))))))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1)))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2))))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 phi2) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 phi2) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 phi2) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 phi2) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi2) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi2) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi2) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi2) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (-.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))))))) (patch (*.f64 (cos.f64 phi2) (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1/2 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))) (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2))))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (-.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))))))) (patch (*.f64 (cos.f64 phi2) (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/2 (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (* 1/24 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))))))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (-.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))))))) (patch (*.f64 (cos.f64 phi2) (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/2 (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))) (* 1/24 (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))))))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (-.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))))))) (patch (*.f64 (cos.f64 phi2) (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2))))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (pow phi2 2))) (taylor 0 phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2))) (taylor 0 phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2))) (taylor 0 phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (- lambda2 lambda1))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi2 2) (cos (- lambda2 lambda1)))))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi2 2) (cos (- lambda2 lambda1)))))))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1))))))))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (cos (- lambda2 lambda1))) (taylor 0 phi2) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos phi1) (* 1/2 (* (pow phi2 2) (cos (- lambda2 lambda1))))) (cos (- lambda2 lambda1))) (taylor 0 phi2) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos phi1) (* (pow phi2 2) (- (* -1/24 (* (pow phi2 2) (cos (- lambda2 lambda1)))) (* -1/2 (cos (- lambda2 lambda1)))))) (cos (- lambda2 lambda1))) (taylor 0 phi2) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos phi1) (* (pow phi2 2) (- (* (pow phi2 2) (- (* 1/720 (* (pow phi2 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1))))) (* -1/2 (cos (- lambda2 lambda1)))))) (cos (- lambda2 lambda1))) (taylor 0 phi2) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (pow (cos (- lambda2 lambda1)) 4)) (taylor 0 phi2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 2 (* (pow phi2 2) (pow (cos (- lambda2 lambda1)) 4))) (pow (cos phi1) 4)) (pow (cos (- lambda2 lambda1)) 4)) (taylor 0 phi2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow phi2 2) (- (* -5/3 (* (pow phi2 2) (pow (cos (- lambda2 lambda1)) 4))) (* -2 (pow (cos (- lambda2 lambda1)) 4)))) (pow (cos phi1) 4)) (pow (cos (- lambda2 lambda1)) 4)) (taylor 0 phi2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow phi2 2) (- (* (pow phi2 2) (- (* 34/45 (* (pow phi2 2) (pow (cos (- lambda2 lambda1)) 4))) (* 5/3 (pow (cos (- lambda2 lambda1)) 4)))) (* -2 (pow (cos (- lambda2 lambda1)) 4)))) (pow (cos phi1) 4)) (pow (cos (- lambda2 lambda1)) 4)) (taylor 0 phi2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf phi2) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf phi2) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf phi2) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf phi2) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi2) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi2) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi2) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi2) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (-.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))))))) (patch (*.f64 (cos.f64 phi2) (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (-.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))))))) (patch (*.f64 (cos.f64 phi2) (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (-.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))))))) (patch (*.f64 (cos.f64 phi2) (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (-.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))))))) (patch (*.f64 (cos.f64 phi2) (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi2) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi2) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi2) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi2) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor inf phi2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor inf phi2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor inf phi2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor inf phi2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor -inf phi2) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor -inf phi2) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor -inf phi2) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor -inf phi2) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi2) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi2) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi2) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi2) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (-.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))))))) (patch (*.f64 (cos.f64 phi2) (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (-.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))))))) (patch (*.f64 (cos.f64 phi2) (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (-.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))))))) (patch (*.f64 (cos.f64 phi2) (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (-.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))))))) (patch (*.f64 (cos.f64 phi2) (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor -inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor -inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor -inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor -inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi2) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi2) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi2) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi2) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor -inf phi2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor -inf phi2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor -inf phi2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor -inf phi2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 phi1) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 phi1) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 phi1) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 phi1) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda2 lambda1))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda2 lambda1))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1/2 (pow phi1 2))) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- 1 (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor 0 phi1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -2 (pow phi1 2))) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor 0 phi1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* (pow phi1 2) (- (* 5/3 (pow phi1 2)) 2))) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor 0 phi1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 5/3 (* -34/45 (pow phi1 2)))) 2))) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor 0 phi1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor inf phi1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor inf phi1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor inf phi1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor inf phi1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor -inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor -inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor -inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor -inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (patch (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi1) (#s(alt (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (patch (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor -inf phi1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor -inf phi1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor -inf phi1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor -inf phi1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
Calls

12 calls:

TimeVariablePointExpression
24.0ms
lambda2
@inf
((+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (/ 1 (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1))) (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (cos (* lambda2 (/ lambda2 (+ lambda2 lambda1))))) (* (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (sin (* lambda2 (/ lambda2 (+ lambda2 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (- (* (sin (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (cos (* lambda2 (/ lambda2 (+ lambda2 lambda1))))) (* (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (sin (* lambda2 (/ lambda2 (+ lambda2 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (- (* (sin (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (cos (* lambda2 (/ lambda2 (+ lambda2 lambda1))))) (* (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (sin (* lambda2 (/ lambda2 (+ lambda2 lambda1))))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 4)) (* (- (cos phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (+ (* (cos phi1) (cos phi1)) (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 4)) (* (- (cos phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (+ (* (cos phi1) (cos phi1)) (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (cos (- lambda1 lambda2)) (* (cos lambda2) (sin lambda1)) (sin (- lambda1 lambda2)) (cos (- lambda2 lambda1)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (sin (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (cos (* lambda2 (/ lambda2 (+ lambda2 lambda1)))) (- (cos phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (- (pow (cos phi1) 4) (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 4)))
15.0ms
phi2
@inf
((+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (/ 1 (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1))) (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (cos (* lambda2 (/ lambda2 (+ lambda2 lambda1))))) (* (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (sin (* lambda2 (/ lambda2 (+ lambda2 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (- (* (sin (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (cos (* lambda2 (/ lambda2 (+ lambda2 lambda1))))) (* (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (sin (* lambda2 (/ lambda2 (+ lambda2 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (- (* (sin (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (cos (* lambda2 (/ lambda2 (+ lambda2 lambda1))))) (* (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (sin (* lambda2 (/ lambda2 (+ lambda2 lambda1))))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 4)) (* (- (cos phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (+ (* (cos phi1) (cos phi1)) (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 4)) (* (- (cos phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (+ (* (cos phi1) (cos phi1)) (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (cos (- lambda1 lambda2)) (* (cos lambda2) (sin lambda1)) (sin (- lambda1 lambda2)) (cos (- lambda2 lambda1)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (sin (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (cos (* lambda2 (/ lambda2 (+ lambda2 lambda1)))) (- (cos phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (- (pow (cos phi1) 4) (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 4)))
12.0ms
lambda1
@0
((+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (/ 1 (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1))) (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (cos (* lambda2 (/ lambda2 (+ lambda2 lambda1))))) (* (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (sin (* lambda2 (/ lambda2 (+ lambda2 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (- (* (sin (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (cos (* lambda2 (/ lambda2 (+ lambda2 lambda1))))) (* (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (sin (* lambda2 (/ lambda2 (+ lambda2 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (- (* (sin (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (cos (* lambda2 (/ lambda2 (+ lambda2 lambda1))))) (* (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (sin (* lambda2 (/ lambda2 (+ lambda2 lambda1))))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 4)) (* (- (cos phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (+ (* (cos phi1) (cos phi1)) (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 4)) (* (- (cos phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (+ (* (cos phi1) (cos phi1)) (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (cos (- lambda1 lambda2)) (* (cos lambda2) (sin lambda1)) (sin (- lambda1 lambda2)) (cos (- lambda2 lambda1)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (sin (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (cos (* lambda2 (/ lambda2 (+ lambda2 lambda1)))) (- (cos phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (- (pow (cos phi1) 4) (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 4)))
10.0ms
lambda1
@-inf
((+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (/ 1 (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1))) (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (cos (* lambda2 (/ lambda2 (+ lambda2 lambda1))))) (* (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (sin (* lambda2 (/ lambda2 (+ lambda2 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (- (* (sin (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (cos (* lambda2 (/ lambda2 (+ lambda2 lambda1))))) (* (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (sin (* lambda2 (/ lambda2 (+ lambda2 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (- (* (sin (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (cos (* lambda2 (/ lambda2 (+ lambda2 lambda1))))) (* (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (sin (* lambda2 (/ lambda2 (+ lambda2 lambda1))))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 4)) (* (- (cos phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (+ (* (cos phi1) (cos phi1)) (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 4)) (* (- (cos phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (+ (* (cos phi1) (cos phi1)) (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (cos (- lambda1 lambda2)) (* (cos lambda2) (sin lambda1)) (sin (- lambda1 lambda2)) (cos (- lambda2 lambda1)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (sin (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (cos (* lambda2 (/ lambda2 (+ lambda2 lambda1)))) (- (cos phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (- (pow (cos phi1) 4) (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 4)))
9.0ms
phi2
@-inf
((+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (/ 1 (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1))) (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (cos (* lambda2 (/ lambda2 (+ lambda2 lambda1))))) (* (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (sin (* lambda2 (/ lambda2 (+ lambda2 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (- (* (sin (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (cos (* lambda2 (/ lambda2 (+ lambda2 lambda1))))) (* (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (sin (* lambda2 (/ lambda2 (+ lambda2 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (- (* (sin (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (cos (* lambda2 (/ lambda2 (+ lambda2 lambda1))))) (* (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (sin (* lambda2 (/ lambda2 (+ lambda2 lambda1))))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 4)) (* (- (cos phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (+ (* (cos phi1) (cos phi1)) (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 4)) (* (- (cos phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (+ (* (cos phi1) (cos phi1)) (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (cos (- lambda1 lambda2)) (* (cos lambda2) (sin lambda1)) (sin (- lambda1 lambda2)) (cos (- lambda2 lambda1)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (sin (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (cos (* lambda2 (/ lambda2 (+ lambda2 lambda1)))) (- (cos phi1) (* (cos (- lambda2 lambda1)) (cos phi2))) (- (pow (cos phi1) 4) (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 4)))

simplify601.0ms (3.2%)

Memory
-1 014.5MiB live, 312.4MiB allocated
Algorithm
egg-herbie
Rules
10 792×lower-fma.f64
10 792×lower-fma.f32
6 858×lower-*.f64
6 858×lower-*.f32
4 838×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0116626458
1359625888
0917424919
Stop Event
iter limit
node limit
Counts
1 092 → 1 080
Calls
Call 1
Inputs
(+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* -1 (* (cos phi2) (sin lambda2)))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (neg lambda2)))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/ 1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ (* -1 (/ lambda1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2))) (/ 1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(+ (* lambda1 (- (/ lambda1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 3)) (/ 1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2)))) (/ 1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(+ (* lambda1 (- (* lambda1 (+ (* -1 (/ lambda1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 4))) (/ 1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 3)))) (/ 1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2)))) (/ 1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* -1 (* (cos phi2) (sin lambda2)))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* 1/2 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos phi2) (- (* -1 (/ (cos lambda2) (pow lambda2 2))) (* (cos lambda2) (- 1/6 (/ 1 (pow lambda2 2))))))))) (* (cos lambda2) (cos phi2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(* (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)))))
(* lambda1 (cos lambda2))
(* lambda1 (+ (cos lambda2) (* -1/6 (* (pow lambda1 2) (cos lambda2)))))
(* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* 1/120 (* (pow lambda1 2) (cos lambda2)))))))
(* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (cos lambda2))) (* 1/120 (cos lambda2))))))))
(sin (neg lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(cos lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(+ (cos phi1) (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))
(+ (cos phi1) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))
1
(+ 1 (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))))
(+ 1 (* (pow lambda1 4) (- (/ lambda1 (pow lambda2 3)) (* 1/2 (/ 1 (pow lambda2 2))))))
(+ 1 (* (pow lambda1 4) (- (* lambda1 (+ (* -3/2 (/ lambda1 (pow lambda2 4))) (/ 1 (pow lambda2 3)))) (* 1/2 (/ 1 (pow lambda2 2))))))
(/ (pow lambda1 2) lambda2)
(* (pow lambda1 2) (+ (* -1 (/ lambda1 (pow lambda2 2))) (/ 1 lambda2)))
(* (pow lambda1 2) (+ (* lambda1 (- (/ lambda1 (pow lambda2 3)) (/ 1 (pow lambda2 2)))) (/ 1 lambda2)))
(* (pow lambda1 2) (+ (* lambda1 (- (* lambda1 (+ (* -1 (/ lambda1 (pow lambda2 4))) (/ 1 (pow lambda2 3)))) (/ 1 (pow lambda2 2)))) (/ 1 lambda2)))
(cos lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (- (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda2))) (* -1 (sin lambda2)))))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (- (+ (* -1/2 (cos lambda2)) (* lambda1 (- (/ (cos lambda2) lambda2) (* (sin lambda2) (- 1/6 (/ 1 (pow lambda2 2))))))) (/ (sin lambda2) lambda2))) (* -1 (sin lambda2)))))
(- (cos phi1) (* (cos lambda2) (cos phi2)))
(- (+ (cos phi1) (* -1 (* lambda1 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))
(- (+ (cos phi1) (* lambda1 (- (* 1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))
(- (+ (cos phi1) (* lambda1 (- (* lambda1 (- (* 1/6 (* lambda1 (* (cos phi2) (sin lambda2)))) (* -1/2 (* (cos lambda2) (cos phi2))))) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))
(- (pow (cos phi1) 4) (* (pow (cos lambda2) 4) (pow (cos phi2) 4)))
(- (+ (* -4 (* lambda1 (* (pow (cos lambda2) 3) (* (pow (cos phi2) 4) (sin lambda2))))) (pow (cos phi1) 4)) (* (pow (cos lambda2) 4) (pow (cos phi2) 4)))
(- (+ (* lambda1 (- (* -1 (* lambda1 (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))) (* 4 (* (pow (cos lambda2) 2) (pow (sin lambda2) 2))))))) (* 4 (* (pow (cos lambda2) 3) (* (pow (cos phi2) 4) (sin lambda2)))))) (pow (cos phi1) 4)) (* (pow (cos lambda2) 4) (pow (cos phi2) 4)))
(- (+ (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda2) 2) (+ (* -1 (* (cos lambda2) (sin lambda2))) (* -1/3 (* (cos lambda2) (sin lambda2)))))) (* 4 (* (cos lambda2) (* (sin lambda2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))))))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))) (* 4 (* (pow (cos lambda2) 2) (pow (sin lambda2) 2))))))) (* 4 (* (pow (cos lambda2) 3) (* (pow (cos phi2) 4) (sin lambda2)))))) (pow (cos phi1) 4)) (* (pow (cos lambda2) 4) (pow (cos phi2) 4)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)))
(/ 1 lambda1)
(/ (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1))) lambda1)
(/ (- (+ 1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2) (pow lambda1 2))) (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)) lambda1)
(/ (- (+ 1 (* -1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 3) (pow lambda1 3)))) (+ (* -1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2) (pow lambda1 2))) (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1))) lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (/ (pow lambda1 2) (+ lambda1 lambda2))))
(+ (* -1 (/ (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))) lambda1)) (* (cos phi2) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))))
(+ (* -1 (/ (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))) lambda1)) (+ (* (cos phi2) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (/ (* (cos phi2) (- (* -1/2 (* (pow lambda2 4) (sin (/ (pow lambda1 2) (+ lambda1 lambda2))))) (* -1 (* (pow lambda2 3) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))))) (pow lambda1 2))))
(+ (* -1 (/ (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))) lambda1)) (+ (* (cos phi2) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (+ (/ (* (cos phi2) (- (* -1/2 (* (pow lambda2 4) (sin (/ (pow lambda1 2) (+ lambda1 lambda2))))) (* -1 (* (pow lambda2 3) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))))) (pow lambda1 2)) (/ (* (cos phi2) (- (* (pow lambda2 5) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (+ (* -1/6 (pow lambda2 6)) (pow lambda2 4))))) (pow lambda1 3)))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) lambda1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(* (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 lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(cos (/ (pow lambda1 2) (+ lambda1 lambda2)))
(cos (/ (pow lambda1 2) (+ lambda1 lambda2)))
(cos (/ (pow lambda1 2) (+ lambda1 lambda2)))
(cos (/ (pow lambda1 2) (+ lambda1 lambda2)))
(sin (/ (pow lambda1 2) (+ lambda1 lambda2)))
(sin (/ (pow lambda1 2) (+ lambda1 lambda2)))
(sin (/ (pow lambda1 2) (+ lambda1 lambda2)))
(sin (/ (pow lambda1 2) (+ lambda1 lambda2)))
1
(+ 1 (* -1/2 (/ (pow lambda2 4) (pow lambda1 2))))
(+ 1 (+ (* -1/2 (/ (pow lambda2 4) (pow lambda1 2))) (/ (pow lambda2 5) (pow lambda1 3))))
(+ 1 (+ (* -1 (/ (pow lambda2 6) (pow lambda1 4))) (+ (* -1/2 (/ (pow lambda2 4) (pow lambda1 2))) (+ (* -1/2 (/ (pow lambda2 6) (pow lambda1 4))) (+ (* 1/24 (/ (pow lambda2 8) (pow lambda1 4))) (/ (pow lambda2 5) (pow lambda1 3)))))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1)))
(/ 1 lambda1)
(* -1 (/ (- (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1) 1) lambda1))
(* -1 (/ (- (* -1 (/ (- (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) 2) lambda1) (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))) lambda1)) 1) lambda1))
(* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) 3) lambda1) (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) 2)) lambda1)) (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))) lambda1)) 1) lambda1))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(* (cos phi2) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))
(+ (* -1 (/ (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) lambda1)) (* (cos phi2) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))
(+ (* -1 (/ (+ (* -1 (/ (* (cos phi2) (- (* -1/2 (* (pow lambda2 4) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) (* -1 (* (pow lambda2 3) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))))) lambda1)) (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))) lambda1)) (* (cos phi2) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))
(+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (cos phi2) (- (* -1 (* (pow lambda2 5) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (+ (* -1 (pow lambda2 4)) (* 1/6 (pow lambda2 6)))))) lambda1)) (* (cos phi2) (- (* -1/2 (* (pow lambda2 4) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) (* -1 (* (pow lambda2 3) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))))) lambda1)) (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))) lambda1)) (* (cos phi2) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))) lambda1)) 1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
1
(+ 1 (* -1/2 (/ (pow lambda2 4) (pow lambda1 2))))
(+ 1 (+ (* -1/2 (/ (pow lambda2 4) (pow lambda1 2))) (/ (pow lambda2 5) (pow lambda1 3))))
(+ 1 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda2 6)) (+ (* -1/2 (pow lambda2 6)) (* 1/24 (pow lambda2 8)))) lambda1)) (* -1 (pow lambda2 5))) (pow lambda1 3))) (* -1/2 (/ (pow lambda2 4) (pow lambda1 2)))))
(- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* lambda2 (* (cos phi2) (- (* (cos lambda1) (- 1/6 (/ 1 (pow lambda1 2)))) (* -1 (/ (cos lambda1) (pow lambda1 2)))))))))) (* (cos phi2) (sin lambda1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(* (cos phi2) (sin lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(sin lambda1)
(+ (sin lambda1) (* -1/2 (* (pow lambda2 2) (sin lambda1))))
(+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* 1/24 (* (pow lambda2 2) (sin lambda1))))))
(+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (sin lambda1))) (* 1/24 (sin lambda1)))))))
(sin lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(cos (neg lambda1))
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(+ (cos phi1) (* (cos phi2) (cos (neg lambda1))))
(+ (cos phi1) (+ (* -1 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* (cos phi2) (cos (neg lambda1)))))
(+ (cos phi1) (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1)))))
(+ (cos phi1) (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi2) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi2) (sin (neg lambda1))))))))) (* (cos phi2) (cos (neg lambda1)))))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (- (* -1/2 (cos lambda1)) (/ (sin lambda1) lambda1))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (- (+ (* -1/2 (cos lambda1)) (* lambda2 (- (/ (cos lambda1) lambda1) (* (sin lambda1) (- 1/6 (/ 1 (pow lambda1 2))))))) (/ (sin lambda1) lambda1))) (* -1 (sin lambda1)))))
(sin lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (/ (cos lambda1) lambda1))))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (+ (* lambda2 (+ (* (cos lambda1) (- 1/6 (/ 1 (pow lambda1 2)))) (/ (sin lambda1) lambda1))) (/ (cos lambda1) lambda1)))))))
1
(+ 1 (* -1/2 (/ (pow lambda2 4) (pow lambda1 2))))
(+ 1 (* (pow lambda2 4) (- (/ lambda2 (pow lambda1 3)) (* 1/2 (/ 1 (pow lambda1 2))))))
(+ 1 (* (pow lambda2 4) (- (* lambda2 (+ (* -3/2 (/ lambda2 (pow lambda1 4))) (/ 1 (pow lambda1 3)))) (* 1/2 (/ 1 (pow lambda1 2))))))
(- (cos phi1) (* (cos phi2) (cos (neg lambda1))))
(- (+ (cos phi1) (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* (cos phi2) (cos (neg lambda1))))
(- (+ (cos phi1) (* lambda2 (- (* 1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))) (* -1 (* (cos phi2) (sin (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1))))
(- (+ (cos phi1) (* lambda2 (- (* lambda2 (- (* -1/6 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* -1/2 (* (cos phi2) (cos (neg lambda1)))))) (* -1 (* (cos phi2) (sin (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg lambda1)) 4)))
(- (+ (* 4 (* lambda2 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda1)) 3) (sin (neg lambda1)))))) (pow (cos phi1) 4)) (* (pow (cos phi2) 4) (pow (cos (neg lambda1)) 4)))
(- (+ (* lambda2 (- (* -1 (* lambda2 (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda1)) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2)))) (* 4 (* (pow (cos (neg lambda1)) 2) (pow (sin (neg lambda1)) 2))))))) (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda1)) 3) (sin (neg lambda1))))))) (pow (cos phi1) 4)) (* (pow (cos phi2) 4) (pow (cos (neg lambda1)) 4)))
(- (+ (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda1)) (* (sin (neg lambda1)) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2))))) (* 2 (* (pow (cos (neg lambda1)) 2) (+ (* 1/3 (* (cos (neg lambda1)) (sin (neg lambda1)))) (* (cos (neg lambda1)) (sin (neg lambda1)))))))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda1)) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2)))) (* 4 (* (pow (cos (neg lambda1)) 2) (pow (sin (neg lambda1)) 2))))))) (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda1)) 3) (sin (neg lambda1))))))) (pow (cos phi1) 4)) (* (pow (cos phi2) 4) (pow (cos (neg lambda1)) 4)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))
(+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (/ (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) lambda2))
(+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (+ (/ (* (cos phi2) (- (* -1 (* (pow lambda1 3) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) (* -1/2 (* (pow lambda1 4) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))) (pow lambda2 2)) (/ (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) lambda2)))
(+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (+ (/ (* (cos phi2) (- (* -1 (* (pow lambda1 3) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) (* -1/2 (* (pow lambda1 4) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))) (pow lambda2 2)) (+ (/ (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (+ (* -1/6 (pow lambda1 6)) (pow lambda1 4))) (* (pow lambda1 5) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (pow lambda2 3)) (/ (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(* (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 lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
1
(+ 1 (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))))
(+ 1 (+ (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))) (/ (pow lambda1 5) (pow lambda2 3))))
(+ 1 (+ (* -1 (/ (pow lambda1 6) (pow lambda2 4))) (+ (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))) (+ (* -1/2 (/ (pow lambda1 6) (pow lambda2 4))) (+ (* 1/24 (/ (pow lambda1 8) (pow lambda2 4))) (/ (pow lambda1 5) (pow lambda2 3)))))))
(/ (pow lambda1 2) lambda2)
(/ (+ (* -1 (/ (pow lambda1 3) lambda2)) (pow lambda1 2)) lambda2)
(/ (+ (* -1 (/ (pow lambda1 3) lambda2)) (+ (* -1/6 (/ (pow lambda1 6) (pow lambda2 2))) (+ (/ (pow lambda1 4) (pow lambda2 2)) (pow lambda1 2)))) lambda2)
(/ (+ (* -1 (/ (pow lambda1 3) lambda2)) (+ (* -1 (/ (pow lambda1 5) (pow lambda2 3))) (+ (* -1/6 (/ (pow lambda1 6) (pow lambda2 2))) (+ (* 1/2 (/ (pow lambda1 7) (pow lambda2 3))) (+ (/ (pow lambda1 4) (pow lambda2 2)) (pow lambda1 2)))))) lambda2)
(cos (/ (pow lambda2 2) (+ lambda1 lambda2)))
(cos (/ (pow lambda2 2) (+ lambda1 lambda2)))
(cos (/ (pow lambda2 2) (+ lambda1 lambda2)))
(cos (/ (pow lambda2 2) (+ lambda1 lambda2)))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))
(+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (/ (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) lambda2))
(+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (* -1 (/ (+ (* -1 (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (* -1 (/ (* (cos phi2) (- (* -1 (* (pow lambda1 3) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (* -1/2 (* (pow lambda1 4) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))))) lambda2))) lambda2)))
(+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (* -1 (/ (+ (* -1 (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (* -1 (/ (+ (* -1 (/ (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (+ (* -1 (pow lambda1 4)) (* 1/6 (pow lambda1 6)))) (* -1 (* (pow lambda1 5) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))))) lambda2)) (* (cos phi2) (- (* -1 (* (pow lambda1 3) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (* -1/2 (* (pow lambda1 4) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))))) lambda2))) lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
1
(+ 1 (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))))
(+ 1 (+ (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))) (/ (pow lambda1 5) (pow lambda2 3))))
(+ 1 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda1 6)) (+ (* -1/2 (pow lambda1 6)) (* 1/24 (pow lambda1 8)))) lambda2)) (* -1 (pow lambda1 5))) (pow lambda2 3))) (* -1/2 (/ (pow lambda1 4) (pow lambda2 2)))))
(/ (pow lambda1 2) lambda2)
(* -1 (/ (+ (* -1 (pow lambda1 2)) (/ (pow lambda1 3) lambda2)) lambda2))
(* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda1 4)) (* 1/6 (pow lambda1 6))) lambda2)) (* -1 (pow lambda1 3))) lambda2)) (* -1 (pow lambda1 2))) lambda2))
(* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda1 5)) (* 1/2 (pow lambda1 7))) lambda2)) (+ (* -1 (pow lambda1 4)) (* 1/6 (pow lambda1 6)))) lambda2)) (* -1 (pow lambda1 3))) lambda2)) (* -1 (pow lambda1 2))) lambda2))
(cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))
(cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))
(cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))
(cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))
(- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4)))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(sin (- lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))
(- (+ (* -1/2 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))) (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2))))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))
(- (+ (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/2 (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (* 1/24 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))))))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))
(- (+ (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/2 (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))) (* 1/24 (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))))))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(sin (- lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
1
(+ 1 (* -1/2 (pow phi2 2)))
(+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))
(+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))
(+ (cos phi1) (cos (- lambda2 lambda1)))
(+ (cos phi1) (+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi2 2) (cos (- lambda2 lambda1))))))
(+ (cos phi1) (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi2 2) (cos (- lambda2 lambda1))))))))
(+ (cos phi1) (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1)))))))))
(- (cos phi1) (cos (- lambda2 lambda1)))
(- (+ (cos phi1) (* 1/2 (* (pow phi2 2) (cos (- lambda2 lambda1))))) (cos (- lambda2 lambda1)))
(- (+ (cos phi1) (* (pow phi2 2) (- (* -1/24 (* (pow phi2 2) (cos (- lambda2 lambda1)))) (* -1/2 (cos (- lambda2 lambda1)))))) (cos (- lambda2 lambda1)))
(- (+ (cos phi1) (* (pow phi2 2) (- (* (pow phi2 2) (- (* 1/720 (* (pow phi2 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1))))) (* -1/2 (cos (- lambda2 lambda1)))))) (cos (- lambda2 lambda1)))
(- (pow (cos phi1) 4) (pow (cos (- lambda2 lambda1)) 4))
(- (+ (* 2 (* (pow phi2 2) (pow (cos (- lambda2 lambda1)) 4))) (pow (cos phi1) 4)) (pow (cos (- lambda2 lambda1)) 4))
(- (+ (* (pow phi2 2) (- (* -5/3 (* (pow phi2 2) (pow (cos (- lambda2 lambda1)) 4))) (* -2 (pow (cos (- lambda2 lambda1)) 4)))) (pow (cos phi1) 4)) (pow (cos (- lambda2 lambda1)) 4))
(- (+ (* (pow phi2 2) (- (* (pow phi2 2) (- (* 34/45 (* (pow phi2 2) (pow (cos (- lambda2 lambda1)) 4))) (* 5/3 (pow (cos (- lambda2 lambda1)) 4)))) (* -2 (pow (cos (- lambda2 lambda1)) 4)))) (pow (cos phi1) 4)) (pow (cos (- lambda2 lambda1)) 4))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(cos phi2)
(cos phi2)
(cos phi2)
(cos phi2)
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(cos phi2)
(cos phi2)
(cos phi2)
(cos phi2)
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda2 lambda1)))))
(+ 1 (+ (* (cos phi2) (cos (- lambda2 lambda1))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(+ 1 (+ (* (cos phi2) (cos (- lambda2 lambda1))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(- 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(- (+ 1 (* -1/2 (pow phi1 2))) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))) (* (cos phi2) (cos (- lambda2 lambda1))))
(- 1 (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (+ 1 (* -2 (pow phi1 2))) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (+ 1 (* (pow phi1 2) (- (* 5/3 (pow phi1 2)) 2))) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 5/3 (* -34/45 (pow phi1 2)))) 2))) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
Outputs
(+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (fma.f64 (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 lambda2) (*.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (neg.f64 (sin.f64 lambda2)))) lambda1 (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* -1 (* (cos phi2) (sin lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))
(*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))
(fma.f64 (*.f64 lambda1 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))))
(fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (neg lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (*.f64 lambda1 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(/ 1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))
(+ (* -1 (/ lambda1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2))) (/ 1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(-.f64 (/.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))) (/.f64 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))))
(+ (* lambda1 (- (/ lambda1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 3)) (/ 1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2)))) (/ 1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(fma.f64 (-.f64 (/.f64 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) lambda1 (/.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))))
(+ (* lambda1 (- (* lambda1 (+ (* -1 (/ lambda1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 4))) (/ 1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 3)))) (/ 1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2)))) (/ 1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(fma.f64 (fma.f64 (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))) (/.f64 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 4 binary64)))) lambda1 (/.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) lambda1 (/.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* -1 (* (cos phi2) (sin lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))
(*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))
(fma.f64 (*.f64 lambda1 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* 1/2 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos phi2) (- (* -1 (/ (cos lambda2) (pow lambda2 2))) (* (cos lambda2) (- 1/6 (/ 1 (pow lambda2 2))))))))) (* (cos lambda2) (cos phi2)))))
(fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (-.f64 (/.f64 (neg.f64 (cos.f64 lambda2)) (*.f64 lambda2 lambda2)) (*.f64 (-.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (*.f64 lambda2 lambda2))) (cos.f64 lambda2))) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(* (cos phi2) (sin (neg lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (*.f64 lambda1 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(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 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(* lambda1 (cos lambda2))
(*.f64 (cos.f64 lambda2) lambda1)
(* lambda1 (+ (cos lambda2) (* -1/6 (* (pow lambda1 2) (cos lambda2)))))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 lambda2)) lambda1)
(* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* 1/120 (* (pow lambda1 2) (cos lambda2)))))))
(fma.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (*.f64 (cos.f64 lambda2) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda1 lambda1) #s(literal -1/6 binary64))) (*.f64 (cos.f64 lambda2) lambda1))
(* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (cos lambda2))) (* 1/120 (cos lambda2))))))))
(fma.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 lambda2) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda1 lambda1) #s(literal 1/120 binary64))) (*.f64 lambda1 lambda1) (*.f64 #s(literal -1/6 binary64) (cos.f64 lambda2))) (*.f64 (cos.f64 lambda2) lambda1))
(sin (neg lambda2))
(neg.f64 (sin.f64 lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 lambda2)) lambda1 (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(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 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda2) lambda1) #s(literal -1/6 binary64) (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))
(fma.f64 (fma.f64 (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (sin.f64 lambda2) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 lambda2))) lambda1 (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))))
(fma.f64 (/.f64 #s(literal -1/2 binary64) lambda2) (/.f64 (pow.f64 lambda1 #s(literal 4 binary64)) lambda2) #s(literal 1 binary64))
(+ 1 (* (pow lambda1 4) (- (/ lambda1 (pow lambda2 3)) (* 1/2 (/ 1 (pow lambda2 2))))))
(fma.f64 (-.f64 (/.f64 lambda1 (pow.f64 lambda2 #s(literal 3 binary64))) (/.f64 #s(literal 1/2 binary64) (*.f64 lambda2 lambda2))) (pow.f64 lambda1 #s(literal 4 binary64)) #s(literal 1 binary64))
(+ 1 (* (pow lambda1 4) (- (* lambda1 (+ (* -3/2 (/ lambda1 (pow lambda2 4))) (/ 1 (pow lambda2 3)))) (* 1/2 (/ 1 (pow lambda2 2))))))
(fma.f64 (fma.f64 (fma.f64 (/.f64 lambda1 (pow.f64 lambda2 #s(literal 4 binary64))) #s(literal -3/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)))) lambda1 (/.f64 #s(literal -1/2 binary64) (*.f64 lambda2 lambda2))) (pow.f64 lambda1 #s(literal 4 binary64)) #s(literal 1 binary64))
(/ (pow lambda1 2) lambda2)
(/.f64 (*.f64 lambda1 lambda1) lambda2)
(* (pow lambda1 2) (+ (* -1 (/ lambda1 (pow lambda2 2))) (/ 1 lambda2)))
(*.f64 (-.f64 (/.f64 #s(literal 1 binary64) lambda2) (/.f64 lambda1 (*.f64 lambda2 lambda2))) (*.f64 lambda1 lambda1))
(* (pow lambda1 2) (+ (* lambda1 (- (/ lambda1 (pow lambda2 3)) (/ 1 (pow lambda2 2)))) (/ 1 lambda2)))
(*.f64 (fma.f64 (-.f64 (/.f64 lambda1 (pow.f64 lambda2 #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 lambda2 lambda2))) lambda1 (/.f64 #s(literal 1 binary64) lambda2)) (*.f64 lambda1 lambda1))
(* (pow lambda1 2) (+ (* lambda1 (- (* lambda1 (+ (* -1 (/ lambda1 (pow lambda2 4))) (/ 1 (pow lambda2 3)))) (/ 1 (pow lambda2 2)))) (/ 1 lambda2)))
(*.f64 (fma.f64 (fma.f64 (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda2 #s(literal 3 binary64))) (/.f64 lambda1 (pow.f64 lambda2 #s(literal 4 binary64)))) lambda1 (/.f64 #s(literal -1 binary64) (*.f64 lambda2 lambda2))) lambda1 (/.f64 #s(literal 1 binary64) lambda2)) (*.f64 lambda1 lambda1))
(cos lambda2)
(cos.f64 lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (- (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda2))) (* -1 (sin lambda2)))))
(fma.f64 (fma.f64 (-.f64 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (/.f64 (sin.f64 lambda2) lambda2)) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (- (+ (* -1/2 (cos lambda2)) (* lambda1 (- (/ (cos lambda2) lambda2) (* (sin lambda2) (- 1/6 (/ 1 (pow lambda2 2))))))) (/ (sin lambda2) lambda2))) (* -1 (sin lambda2)))))
(fma.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (cos.f64 lambda2) lambda2) (*.f64 (-.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (*.f64 lambda2 lambda2))) (sin.f64 lambda2))) lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64))) (/.f64 (sin.f64 lambda2) lambda2)) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(- (cos phi1) (* (cos lambda2) (cos phi2)))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))
(- (+ (cos phi1) (* -1 (* lambda1 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))
(fma.f64 (neg.f64 (*.f64 lambda1 (cos.f64 phi2))) (sin.f64 lambda2) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))
(- (+ (cos phi1) (* lambda1 (- (* 1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1)) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) lambda1 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))
(- (+ (cos phi1) (* lambda1 (- (* lambda1 (- (* 1/6 (* lambda1 (* (cos phi2) (sin lambda2)))) (* -1/2 (* (cos lambda2) (cos phi2))))) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)) (cos.f64 phi2))) lambda1 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) lambda1 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))
(- (pow (cos phi1) 4) (* (pow (cos lambda2) 4) (pow (cos phi2) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (+ (* -4 (* lambda1 (* (pow (cos lambda2) 3) (* (pow (cos phi2) 4) (sin lambda2))))) (pow (cos phi1) 4)) (* (pow (cos lambda2) 4) (pow (cos phi2) 4)))
(fma.f64 (*.f64 #s(literal -4 binary64) (*.f64 lambda1 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))))
(- (+ (* lambda1 (- (* -1 (* lambda1 (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))) (* 4 (* (pow (cos lambda2) 2) (pow (sin lambda2) 2))))))) (* 4 (* (pow (cos lambda2) 3) (* (pow (cos phi2) 4) (sin lambda2)))))) (pow (cos phi1) 4)) (* (pow (cos lambda2) 4) (pow (cos phi2) 4)))
(fma.f64 (neg.f64 (fma.f64 (*.f64 lambda1 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))) (fma.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (-.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda2))))) lambda1 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))))
(- (+ (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda2) 2) (+ (* -1 (* (cos lambda2) (sin lambda2))) (* -1/3 (* (cos lambda2) (sin lambda2)))))) (* 4 (* (cos lambda2) (* (sin lambda2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))))))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))) (* 4 (* (pow (cos lambda2) 2) (pow (sin lambda2) 2))))))) (* 4 (* (pow (cos lambda2) 3) (* (pow (cos phi2) 4) (sin lambda2)))))) (pow (cos phi1) 4)) (* (pow (cos lambda2) 4) (pow (cos phi2) 4)))
(fma.f64 (fma.f64 (neg.f64 (fma.f64 (*.f64 lambda1 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda2))) #s(literal -4/3 binary64) (*.f64 (*.f64 #s(literal 4 binary64) (cos.f64 lambda2)) (*.f64 (-.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (sin.f64 lambda2)))) (*.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (-.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))))) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) lambda1 (*.f64 (*.f64 #s(literal -4 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda2)))) lambda1 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
(/ (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1))) lambda1)
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) lambda1)
(/ (- (+ 1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2) (pow lambda1 2))) (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)) lambda1)
(/.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) lambda1)
(/ (- (+ 1 (* -1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 3) (pow lambda1 3)))) (+ (* -1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2) (pow lambda1 2))) (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1))) lambda1)
(/.f64 (-.f64 (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))) (-.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))) lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (/ (pow lambda1 2) (+ lambda1 lambda2))))
(*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 phi2))
(+ (* -1 (/ (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))) lambda1)) (* (cos phi2) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))))
(fma.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 phi2) (/.f64 (*.f64 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 phi2)) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (neg.f64 lambda1)))
(+ (* -1 (/ (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))) lambda1)) (+ (* (cos phi2) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (/ (* (cos phi2) (- (* -1/2 (* (pow lambda2 4) (sin (/ (pow lambda1 2) (+ lambda1 lambda2))))) (* -1 (* (pow lambda2 3) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))))) (pow lambda1 2))))
(fma.f64 (neg.f64 (*.f64 lambda2 lambda2)) (/.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) lambda1) (*.f64 (cos.f64 phi2) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda2 #s(literal 4 binary64))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (*.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (*.f64 lambda1 lambda1)) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))))
(+ (* -1 (/ (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))) lambda1)) (+ (* (cos phi2) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (+ (/ (* (cos phi2) (- (* -1/2 (* (pow lambda2 4) (sin (/ (pow lambda1 2) (+ lambda1 lambda2))))) (* -1 (* (pow lambda2 3) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))))) (pow lambda1 2)) (/ (* (cos phi2) (- (* (pow lambda2 5) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (+ (* -1/6 (pow lambda2 6)) (pow lambda2 4))))) (pow lambda1 3)))))
(fma.f64 (neg.f64 (*.f64 lambda2 lambda2)) (/.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) lambda1) (fma.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (cos.f64 phi2) (+.f64 (/.f64 (fma.f64 (pow.f64 lambda2 #s(literal 5 binary64)) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (*.f64 (neg.f64 (fma.f64 (pow.f64 lambda2 #s(literal 6 binary64)) #s(literal -1/6 binary64) (pow.f64 lambda2 #s(literal 4 binary64)))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (pow.f64 lambda1 #s(literal 3 binary64))) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda2 #s(literal 4 binary64))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (*.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (*.f64 lambda1 lambda1))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.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 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 lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(cos (/ (pow lambda1 2) (+ lambda1 lambda2)))
(cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(cos (/ (pow lambda1 2) (+ lambda1 lambda2)))
(cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(cos (/ (pow lambda1 2) (+ lambda1 lambda2)))
(cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(cos (/ (pow lambda1 2) (+ lambda1 lambda2)))
(cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(sin (/ (pow lambda1 2) (+ lambda1 lambda2)))
(sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(sin (/ (pow lambda1 2) (+ lambda1 lambda2)))
(sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(sin (/ (pow lambda1 2) (+ lambda1 lambda2)))
(sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(sin (/ (pow lambda1 2) (+ lambda1 lambda2)))
(sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (/ (pow lambda2 4) (pow lambda1 2))))
(fma.f64 (/.f64 #s(literal -1/2 binary64) lambda1) (/.f64 (pow.f64 lambda2 #s(literal 4 binary64)) lambda1) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (/ (pow lambda2 4) (pow lambda1 2))) (/ (pow lambda2 5) (pow lambda1 3))))
(+.f64 (fma.f64 (/.f64 #s(literal -1/2 binary64) lambda1) (/.f64 (pow.f64 lambda2 #s(literal 4 binary64)) lambda1) (/.f64 (pow.f64 lambda2 #s(literal 5 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (pow lambda2 6) (pow lambda1 4))) (+ (* -1/2 (/ (pow lambda2 4) (pow lambda1 2))) (+ (* -1/2 (/ (pow lambda2 6) (pow lambda1 4))) (+ (* 1/24 (/ (pow lambda2 8) (pow lambda1 4))) (/ (pow lambda2 5) (pow lambda1 3)))))))
(+.f64 (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 lambda2 #s(literal 6 binary64)) (pow.f64 lambda1 #s(literal 4 binary64)))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (pow.f64 lambda2 #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (/.f64 (pow.f64 lambda2 #s(literal 6 binary64)) (pow.f64 lambda1 #s(literal 4 binary64)))) (fma.f64 (/.f64 (pow.f64 lambda2 #s(literal 8 binary64)) (pow.f64 lambda1 #s(literal 4 binary64))) #s(literal 1/24 binary64) (/.f64 (pow.f64 lambda2 #s(literal 5 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
(* -1 (/ (- (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1) 1) lambda1))
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) lambda1)
(* -1 (/ (- (* -1 (/ (- (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) 2) lambda1) (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))) lambda1)) 1) lambda1))
(/.f64 (fma.f64 (/.f64 (-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) lambda1) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))) (neg.f64 lambda1)) #s(literal -1 binary64) #s(literal 1 binary64)) lambda1)
(* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) 3) lambda1) (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) 2)) lambda1)) (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))) lambda1)) 1) lambda1))
(/.f64 (fma.f64 (/.f64 (-.f64 (/.f64 (-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))) (neg.f64 lambda1)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))) (neg.f64 lambda1)) #s(literal -1 binary64) #s(literal 1 binary64)) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 phi2))
(+ (* -1 (/ (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) lambda1)) (* (cos phi2) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))
(fma.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 phi2) (/.f64 (*.f64 (*.f64 (*.f64 lambda2 lambda2) (cos.f64 phi2)) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (neg.f64 lambda1)))
(+ (* -1 (/ (+ (* -1 (/ (* (cos phi2) (- (* -1/2 (* (pow lambda2 4) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) (* -1 (* (pow lambda2 3) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))))) lambda1)) (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))) lambda1)) (* (cos phi2) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))
(fma.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 phi2) (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) lambda2) lambda2 (*.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda2 #s(literal 4 binary64))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (*.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) lambda1))) (neg.f64 lambda1)))
(+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (cos phi2) (- (* -1 (* (pow lambda2 5) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (+ (* -1 (pow lambda2 4)) (* 1/6 (pow lambda2 6)))))) lambda1)) (* (cos phi2) (- (* -1/2 (* (pow lambda2 4) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) (* -1 (* (pow lambda2 3) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))))) lambda1)) (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))) lambda1)) (* (cos phi2) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))
(fma.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 phi2) (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) lambda2) lambda2 (/.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (neg.f64 (fma.f64 (pow.f64 lambda2 #s(literal 5 binary64)) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (*.f64 (fma.f64 (pow.f64 lambda2 #s(literal 6 binary64)) #s(literal 1/6 binary64) (neg.f64 (pow.f64 lambda2 #s(literal 4 binary64)))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))) lambda1) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda2 #s(literal 4 binary64))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (*.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2))) (neg.f64 lambda1))) (neg.f64 lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) (neg.f64 lambda1)) lambda1)
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(* (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 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 lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (/ (pow lambda2 4) (pow lambda1 2))))
(fma.f64 (/.f64 #s(literal -1/2 binary64) lambda1) (/.f64 (pow.f64 lambda2 #s(literal 4 binary64)) lambda1) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (/ (pow lambda2 4) (pow lambda1 2))) (/ (pow lambda2 5) (pow lambda1 3))))
(+.f64 (fma.f64 (/.f64 #s(literal -1/2 binary64) lambda1) (/.f64 (pow.f64 lambda2 #s(literal 4 binary64)) lambda1) (/.f64 (pow.f64 lambda2 #s(literal 5 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda2 6)) (+ (* -1/2 (pow lambda2 6)) (* 1/24 (pow lambda2 8)))) lambda1)) (* -1 (pow lambda2 5))) (pow lambda1 3))) (* -1/2 (/ (pow lambda2 4) (pow lambda1 2)))))
(fma.f64 (/.f64 (-.f64 (neg.f64 (pow.f64 lambda2 #s(literal 5 binary64))) (/.f64 (fma.f64 (pow.f64 lambda2 #s(literal 6 binary64)) #s(literal -3/2 binary64) (*.f64 (pow.f64 lambda2 #s(literal 8 binary64)) #s(literal 1/24 binary64))) lambda1)) (pow.f64 lambda1 #s(literal 3 binary64))) #s(literal -1 binary64) (fma.f64 (/.f64 #s(literal -1/2 binary64) lambda1) (/.f64 (pow.f64 lambda2 #s(literal 4 binary64)) lambda1) #s(literal 1 binary64)))
(- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (sin.f64 lambda1) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (*.f64 lambda2 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (cos.f64 phi2))) (sin.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(fma.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi2))) (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 lambda2 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (sin.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(fma.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi2))) (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 lambda2 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (sin.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(fma.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi2))) (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 lambda2 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (sin.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* lambda2 (* (cos phi2) (- (* (cos lambda1) (- 1/6 (/ 1 (pow lambda1 2)))) (* -1 (/ (cos lambda1) (pow lambda1 2)))))))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (fma.f64 (-.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda1))) (cos.f64 lambda1) (/.f64 (cos.f64 lambda1) (*.f64 lambda1 lambda1))) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(* (cos phi2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(fma.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi2))) (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 lambda2 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (sin.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(cos lambda1)
(cos.f64 lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) lambda2) #s(literal -1/6 binary64) (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1/2 (* (pow lambda2 2) (sin lambda1))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) lambda2 #s(literal 1 binary64)) (sin.f64 lambda1))
(+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* 1/24 (* (pow lambda2 2) (sin lambda1))))))
(fma.f64 (*.f64 (sin.f64 lambda1) (fma.f64 #s(literal 1/24 binary64) (*.f64 lambda2 lambda2) #s(literal -1/2 binary64))) (*.f64 lambda2 lambda2) (sin.f64 lambda1))
(+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (sin lambda1))) (* 1/24 (sin lambda1)))))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (fma.f64 #s(literal -1/720 binary64) (*.f64 lambda2 lambda2) #s(literal 1/24 binary64))) (*.f64 lambda2 lambda2) (*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 lambda2 lambda2) (sin.f64 lambda1))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(fma.f64 (fma.f64 (*.f64 lambda2 #s(literal -1/2 binary64)) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(cos (neg lambda1))
(cos.f64 lambda1)
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (neg.f64 (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos phi1) (* (cos phi2) (cos (neg lambda1))))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* -1 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* (cos phi2) (cos (neg lambda1)))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (sin.f64 lambda1) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1)))))
(fma.f64 (fma.f64 (*.f64 lambda2 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi2) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi2) (sin (neg lambda1))))))))) (* (cos phi2) (cos (neg lambda1)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 lambda2 (cos.f64 phi2))) (neg.f64 (sin.f64 lambda1)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(cos lambda1)
(cos.f64 lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (- (* -1/2 (cos lambda1)) (/ (sin lambda1) lambda1))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (-.f64 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) (/.f64 (sin.f64 lambda1) lambda1)) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (- (+ (* -1/2 (cos lambda1)) (* lambda2 (- (/ (cos lambda1) lambda1) (* (sin lambda1) (- 1/6 (/ 1 (pow lambda1 2))))))) (/ (sin lambda1) lambda1))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (cos.f64 lambda1) lambda1) (*.f64 (-.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda1))) (sin.f64 lambda1))) lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) (/.f64 (sin.f64 lambda1) lambda1)) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (/ (cos lambda1) lambda1))))))
(fma.f64 (fma.f64 (fma.f64 (sin.f64 lambda1) #s(literal -1/2 binary64) (/.f64 (cos.f64 lambda1) lambda1)) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (+ (* lambda2 (+ (* (cos lambda1) (- 1/6 (/ 1 (pow lambda1 2)))) (/ (sin lambda1) lambda1))) (/ (cos lambda1) lambda1)))))))
(fma.f64 (fma.f64 (fma.f64 (fma.f64 (-.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda1))) (cos.f64 lambda1) (/.f64 (sin.f64 lambda1) lambda1)) lambda2 (fma.f64 (sin.f64 lambda1) #s(literal -1/2 binary64) (/.f64 (cos.f64 lambda1) lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (/ (pow lambda2 4) (pow lambda1 2))))
(fma.f64 (/.f64 #s(literal -1/2 binary64) lambda1) (/.f64 (pow.f64 lambda2 #s(literal 4 binary64)) lambda1) #s(literal 1 binary64))
(+ 1 (* (pow lambda2 4) (- (/ lambda2 (pow lambda1 3)) (* 1/2 (/ 1 (pow lambda1 2))))))
(fma.f64 (-.f64 (/.f64 lambda2 (pow.f64 lambda1 #s(literal 3 binary64))) (/.f64 #s(literal 1/2 binary64) (*.f64 lambda1 lambda1))) (pow.f64 lambda2 #s(literal 4 binary64)) #s(literal 1 binary64))
(+ 1 (* (pow lambda2 4) (- (* lambda2 (+ (* -3/2 (/ lambda2 (pow lambda1 4))) (/ 1 (pow lambda1 3)))) (* 1/2 (/ 1 (pow lambda1 2))))))
(fma.f64 (fma.f64 (fma.f64 (/.f64 lambda2 (pow.f64 lambda1 #s(literal 4 binary64))) #s(literal -3/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)))) lambda2 (/.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1))) (pow.f64 lambda2 #s(literal 4 binary64)) #s(literal 1 binary64))
(- (cos phi1) (* (cos phi2) (cos (neg lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))
(- (+ (cos phi1) (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* (cos phi2) (cos (neg lambda1))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (neg.f64 (sin.f64 lambda1)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
(- (+ (cos phi1) (* lambda2 (- (* 1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))) (* -1 (* (cos phi2) (sin (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 phi2))) lambda2 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
(- (+ (cos phi1) (* lambda2 (- (* lambda2 (- (* -1/6 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* -1/2 (* (cos phi2) (cos (neg lambda1)))))) (* -1 (* (cos phi2) (sin (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (neg.f64 (sin.f64 lambda1))) (cos.f64 phi2) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi2))) lambda2 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 phi2))) lambda2 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (+ (* 4 (* lambda2 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda1)) 3) (sin (neg lambda1)))))) (pow (cos phi1) 4)) (* (pow (cos phi2) 4) (pow (cos (neg lambda1)) 4)))
(fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 lambda2 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (neg.f64 (sin.f64 lambda1))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))))
(- (+ (* lambda2 (- (* -1 (* lambda2 (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda1)) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2)))) (* 4 (* (pow (cos (neg lambda1)) 2) (pow (sin (neg lambda1)) 2))))))) (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda1)) 3) (sin (neg lambda1))))))) (pow (cos phi1) 4)) (* (pow (cos phi2) 4) (pow (cos (neg lambda1)) 4)))
(fma.f64 (neg.f64 (fma.f64 (*.f64 lambda2 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))) (fma.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (*.f64 (sin.f64 lambda1) (sin.f64 lambda1)) (*.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda1) (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(literal -4 binary64) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (neg.f64 (sin.f64 lambda1)))))) lambda2 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))))
(- (+ (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda1)) (* (sin (neg lambda1)) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2))))) (* 2 (* (pow (cos (neg lambda1)) 2) (+ (* 1/3 (* (cos (neg lambda1)) (sin (neg lambda1)))) (* (cos (neg lambda1)) (sin (neg lambda1)))))))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda1)) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2)))) (* 4 (* (pow (cos (neg lambda1)) 2) (pow (sin (neg lambda1)) 2))))))) (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda1)) 3) (sin (neg lambda1))))))) (pow (cos phi1) 4)) (* (pow (cos phi2) 4) (pow (cos (neg lambda1)) 4)))
(fma.f64 (fma.f64 (neg.f64 (fma.f64 (*.f64 lambda2 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) #s(literal 4/3 binary64)) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda1)) (*.f64 (*.f64 #s(literal -4 binary64) (cos.f64 lambda1)) (fma.f64 (sin.f64 lambda1) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (neg.f64 (sin.f64 lambda1)) #s(literal 3 binary64))))) (*.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (*.f64 (sin.f64 lambda1) (sin.f64 lambda1)) (*.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda1) (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) lambda2 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (neg.f64 (sin.f64 lambda1))))) lambda2 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))
(*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))
(+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (/ (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) lambda2))
(fma.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (/.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) (cos.f64 phi2)) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))) lambda2))
(+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (+ (/ (* (cos phi2) (- (* -1 (* (pow lambda1 3) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) (* -1/2 (* (pow lambda1 4) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))) (pow lambda2 2)) (/ (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) lambda2)))
(fma.f64 (/.f64 (cos.f64 phi2) lambda2) (/.f64 (neg.f64 (fma.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (pow.f64 lambda1 #s(literal 3 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 4 binary64))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))) lambda2) (fma.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (/.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) (cos.f64 phi2)) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))) lambda2)))
(+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (+ (/ (* (cos phi2) (- (* -1 (* (pow lambda1 3) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) (* -1/2 (* (pow lambda1 4) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))) (pow lambda2 2)) (+ (/ (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (+ (* -1/6 (pow lambda1 6)) (pow lambda1 4))) (* (pow lambda1 5) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (pow lambda2 3)) (/ (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) lambda2))))
(fma.f64 (neg.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))) (cos.f64 phi2) (fma.f64 (cos.f64 phi2) (+.f64 (/.f64 (neg.f64 (fma.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (pow.f64 lambda1 #s(literal 3 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 4 binary64))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))) (*.f64 lambda2 lambda2)) (/.f64 (fma.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (fma.f64 (pow.f64 lambda1 #s(literal 6 binary64)) #s(literal -1/6 binary64) (pow.f64 lambda1 #s(literal 4 binary64))) (*.f64 (neg.f64 (pow.f64 lambda1 #s(literal 5 binary64))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) (pow.f64 lambda2 #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) (cos.f64 phi2)) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))) lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.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 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 lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))))
(fma.f64 (/.f64 #s(literal -1/2 binary64) lambda2) (/.f64 (pow.f64 lambda1 #s(literal 4 binary64)) lambda2) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))) (/ (pow lambda1 5) (pow lambda2 3))))
(+.f64 (fma.f64 (/.f64 #s(literal -1/2 binary64) lambda2) (/.f64 (pow.f64 lambda1 #s(literal 4 binary64)) lambda2) (/.f64 (pow.f64 lambda1 #s(literal 5 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (pow lambda1 6) (pow lambda2 4))) (+ (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))) (+ (* -1/2 (/ (pow lambda1 6) (pow lambda2 4))) (+ (* 1/24 (/ (pow lambda1 8) (pow lambda2 4))) (/ (pow lambda1 5) (pow lambda2 3)))))))
(+.f64 (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 lambda1 #s(literal 6 binary64)) (pow.f64 lambda2 #s(literal 4 binary64)))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (*.f64 lambda2 lambda2)) (/.f64 (pow.f64 lambda1 #s(literal 6 binary64)) (pow.f64 lambda2 #s(literal 4 binary64)))) (fma.f64 (/.f64 (pow.f64 lambda1 #s(literal 8 binary64)) (pow.f64 lambda2 #s(literal 4 binary64))) #s(literal 1/24 binary64) (/.f64 (pow.f64 lambda1 #s(literal 5 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))))))
(/ (pow lambda1 2) lambda2)
(/.f64 (*.f64 lambda1 lambda1) lambda2)
(/ (+ (* -1 (/ (pow lambda1 3) lambda2)) (pow lambda1 2)) lambda2)
(/.f64 (fma.f64 lambda1 lambda1 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (neg.f64 lambda2))) lambda2)
(/ (+ (* -1 (/ (pow lambda1 3) lambda2)) (+ (* -1/6 (/ (pow lambda1 6) (pow lambda2 2))) (+ (/ (pow lambda1 4) (pow lambda2 2)) (pow lambda1 2)))) lambda2)
(/.f64 (-.f64 (fma.f64 (/.f64 (pow.f64 lambda1 #s(literal 6 binary64)) lambda2) (/.f64 #s(literal -1/6 binary64) lambda2) (fma.f64 lambda1 lambda1 (/.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (*.f64 lambda2 lambda2)))) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) lambda2)) lambda2)
(/ (+ (* -1 (/ (pow lambda1 3) lambda2)) (+ (* -1 (/ (pow lambda1 5) (pow lambda2 3))) (+ (* -1/6 (/ (pow lambda1 6) (pow lambda2 2))) (+ (* 1/2 (/ (pow lambda1 7) (pow lambda2 3))) (+ (/ (pow lambda1 4) (pow lambda2 2)) (pow lambda1 2)))))) lambda2)
(/.f64 (-.f64 (-.f64 (fma.f64 (/.f64 (pow.f64 lambda1 #s(literal 6 binary64)) lambda2) (/.f64 #s(literal -1/6 binary64) lambda2) (fma.f64 (/.f64 (pow.f64 lambda1 #s(literal 7 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) #s(literal 1/2 binary64) (fma.f64 lambda1 lambda1 (/.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (*.f64 lambda2 lambda2))))) (/.f64 (pow.f64 lambda1 #s(literal 5 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) lambda2)) lambda2)
(cos (/ (pow lambda2 2) (+ lambda1 lambda2)))
(cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(cos (/ (pow lambda2 2) (+ lambda1 lambda2)))
(cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(cos (/ (pow lambda2 2) (+ lambda1 lambda2)))
(cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(cos (/ (pow lambda2 2) (+ lambda1 lambda2)))
(cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))
(*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))
(+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (/ (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) lambda2))
(fma.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (/.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) (cos.f64 phi2)) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))) lambda2))
(+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (* -1 (/ (+ (* -1 (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (* -1 (/ (* (cos phi2) (- (* -1 (* (pow lambda1 3) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (* -1/2 (* (pow lambda1 4) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))))) lambda2))) lambda2)))
(neg.f64 (fma.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 phi2) (/.f64 (neg.f64 (fma.f64 (cos.f64 phi2) (/.f64 (neg.f64 (fma.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (pow.f64 lambda1 #s(literal 3 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 4 binary64))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))) lambda2) (*.f64 (*.f64 (*.f64 lambda1 lambda1) (cos.f64 phi2)) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))) lambda2)))
(+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (* -1 (/ (+ (* -1 (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (* -1 (/ (+ (* -1 (/ (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (+ (* -1 (pow lambda1 4)) (* 1/6 (pow lambda1 6)))) (* -1 (* (pow lambda1 5) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))))) lambda2)) (* (cos phi2) (- (* -1 (* (pow lambda1 3) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (* -1/2 (* (pow lambda1 4) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))))) lambda2))) lambda2)))
(neg.f64 (fma.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 phi2) (/.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) lambda1) lambda1 (/.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (fma.f64 (fma.f64 (pow.f64 lambda1 #s(literal 6 binary64)) #s(literal 1/6 binary64) (neg.f64 (pow.f64 lambda1 #s(literal 4 binary64)))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (pow.f64 lambda1 #s(literal 5 binary64)))) lambda2) (*.f64 (neg.f64 (fma.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (pow.f64 lambda1 #s(literal 3 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 4 binary64))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))) (cos.f64 phi2))) lambda2))) lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(* (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 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 lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))))
(fma.f64 (/.f64 #s(literal -1/2 binary64) lambda2) (/.f64 (pow.f64 lambda1 #s(literal 4 binary64)) lambda2) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))) (/ (pow lambda1 5) (pow lambda2 3))))
(+.f64 (fma.f64 (/.f64 #s(literal -1/2 binary64) lambda2) (/.f64 (pow.f64 lambda1 #s(literal 4 binary64)) lambda2) (/.f64 (pow.f64 lambda1 #s(literal 5 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda1 6)) (+ (* -1/2 (pow lambda1 6)) (* 1/24 (pow lambda1 8)))) lambda2)) (* -1 (pow lambda1 5))) (pow lambda2 3))) (* -1/2 (/ (pow lambda1 4) (pow lambda2 2)))))
(fma.f64 (/.f64 (-.f64 (neg.f64 (pow.f64 lambda1 #s(literal 5 binary64))) (/.f64 (fma.f64 (pow.f64 lambda1 #s(literal 6 binary64)) #s(literal -3/2 binary64) (*.f64 (pow.f64 lambda1 #s(literal 8 binary64)) #s(literal 1/24 binary64))) lambda2)) (pow.f64 lambda2 #s(literal 3 binary64))) #s(literal -1 binary64) (fma.f64 (/.f64 #s(literal -1/2 binary64) lambda2) (/.f64 (pow.f64 lambda1 #s(literal 4 binary64)) lambda2) #s(literal 1 binary64)))
(/ (pow lambda1 2) lambda2)
(/.f64 (*.f64 lambda1 lambda1) lambda2)
(* -1 (/ (+ (* -1 (pow lambda1 2)) (/ (pow lambda1 3) lambda2)) lambda2))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) lambda2)) (neg.f64 lambda2))
(* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda1 4)) (* 1/6 (pow lambda1 6))) lambda2)) (* -1 (pow lambda1 3))) lambda2)) (* -1 (pow lambda1 2))) lambda2))
(/.f64 (neg.f64 (fma.f64 lambda1 lambda1 (/.f64 (-.f64 (neg.f64 (pow.f64 lambda1 #s(literal 3 binary64))) (/.f64 (fma.f64 (pow.f64 lambda1 #s(literal 6 binary64)) #s(literal 1/6 binary64) (neg.f64 (pow.f64 lambda1 #s(literal 4 binary64)))) lambda2)) lambda2))) (neg.f64 lambda2))
(* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda1 5)) (* 1/2 (pow lambda1 7))) lambda2)) (+ (* -1 (pow lambda1 4)) (* 1/6 (pow lambda1 6)))) lambda2)) (* -1 (pow lambda1 3))) lambda2)) (* -1 (pow lambda1 2))) lambda2))
(/.f64 (neg.f64 (fma.f64 lambda1 lambda1 (/.f64 (-.f64 (/.f64 (-.f64 (fma.f64 (pow.f64 lambda1 #s(literal 6 binary64)) #s(literal 1/6 binary64) (neg.f64 (pow.f64 lambda1 #s(literal 4 binary64)))) (/.f64 (fma.f64 (pow.f64 lambda1 #s(literal 7 binary64)) #s(literal 1/2 binary64) (neg.f64 (pow.f64 lambda1 #s(literal 5 binary64)))) lambda2)) (neg.f64 lambda2)) (pow.f64 lambda1 #s(literal 3 binary64))) lambda2))) (neg.f64 lambda2))
(cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))
(cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))
(cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))
(cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))
(cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1))))
(fma.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))
(fma.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))))
(fma.f64 (fma.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))
(-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))
(- (+ (* -1/2 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))) (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2))))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))
(*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))))
(- (+ (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/2 (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (* 1/24 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))))))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))
(fma.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))))
(- (+ (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/2 (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))) (* 1/24 (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))))))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))
(fma.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #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)))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (pow phi2 2)))
(fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))
(+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))
(+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))
(fma.f64 (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))
(+ (cos phi1) (cos (- lambda2 lambda1)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi2 2) (cos (- lambda2 lambda1))))))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi2 2) (cos (- lambda2 lambda1))))))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(+ (cos phi1) (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1)))))))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(- (cos phi1) (cos (- lambda2 lambda1)))
(-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(- (+ (cos phi1) (* 1/2 (* (pow phi2 2) (cos (- lambda2 lambda1))))) (cos (- lambda2 lambda1)))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 phi2 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(- (+ (cos phi1) (* (pow phi2 2) (- (* -1/24 (* (pow phi2 2) (cos (- lambda2 lambda1)))) (* -1/2 (cos (- lambda2 lambda1)))))) (cos (- lambda2 lambda1)))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/24 binary64) (*.f64 phi2 phi2) #s(literal 1/2 binary64))) (*.f64 phi2 phi2) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(- (+ (cos phi1) (* (pow phi2 2) (- (* (pow phi2 2) (- (* 1/720 (* (pow phi2 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1))))) (* -1/2 (cos (- lambda2 lambda1)))))) (cos (- lambda2 lambda1)))
(fma.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/720 binary64) (*.f64 phi2 phi2) #s(literal -1/24 binary64))) phi2) phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (*.f64 phi2 phi2) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(- (pow (cos phi1) 4) (pow (cos (- lambda2 lambda1)) 4))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))
(- (+ (* 2 (* (pow phi2 2) (pow (cos (- lambda2 lambda1)) 4))) (pow (cos phi1) 4)) (pow (cos (- lambda2 lambda1)) 4))
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 phi2)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))
(- (+ (* (pow phi2 2) (- (* -5/3 (* (pow phi2 2) (pow (cos (- lambda2 lambda1)) 4))) (* -2 (pow (cos (- lambda2 lambda1)) 4)))) (pow (cos phi1) 4)) (pow (cos (- lambda2 lambda1)) 4))
(fma.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (fma.f64 #s(literal -5/3 binary64) (*.f64 phi2 phi2) #s(literal 2 binary64))) (*.f64 phi2 phi2) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))
(- (+ (* (pow phi2 2) (- (* (pow phi2 2) (- (* 34/45 (* (pow phi2 2) (pow (cos (- lambda2 lambda1)) 4))) (* 5/3 (pow (cos (- lambda2 lambda1)) 4)))) (* -2 (pow (cos (- lambda2 lambda1)) 4)))) (pow (cos phi1) 4)) (pow (cos (- lambda2 lambda1)) 4))
(fma.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (fma.f64 #s(literal 34/45 binary64) (*.f64 phi2 phi2) #s(literal -5/3 binary64))) (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 phi2 phi2) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(fma.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi1 phi1) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda2 lambda1)))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (cos (- lambda2 lambda1))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (cos (- lambda2 lambda1))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(fma.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi1 phi1) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(- 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (+ 1 (* -1/2 (pow phi1 2))) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi1 phi1) #s(literal -1/2 binary64)) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- 1 (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (+ 1 (* -2 (pow phi1 2))) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(fma.f64 (*.f64 #s(literal -2 binary64) phi1) phi1 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))))
(- (+ 1 (* (pow phi1 2) (- (* 5/3 (pow phi1 2)) 2))) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 5/3 binary64) #s(literal -2 binary64)) phi1) phi1 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))))
(- (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 5/3 (* -34/45 (pow phi1 2)))) 2))) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(fma.f64 (*.f64 (fma.f64 (fma.f64 #s(literal -34/45 binary64) (*.f64 phi1 phi1) #s(literal 5/3 binary64)) (*.f64 phi1 phi1) #s(literal -2 binary64)) phi1) phi1 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))

rewrite317.0ms (1.7%)

Memory
42.9MiB live, 263.8MiB allocated
Rules
5 340×lower-*.f32
5 320×lower-*.f64
4 262×lower-fma.f32
4 256×lower-fma.f64
2 972×lower-/.f32
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
066535
0122445
1436348
23382348
09111348
Stop Event
iter limit
node limit
iter limit
Counts
28 → 782
Calls
Call 1
Inputs
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi2) (-.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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))))
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(sin.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1))))
(sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1))))
(cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64)))
Outputs
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>

eval562.0ms (2.9%)

Memory
30.8MiB live, 845.8MiB allocated
Compiler

Compiled 124 109 to 5 839 computations (95.3% saved)

prune157.0ms (0.8%)

Memory
-51.6MiB live, 333.0MiB allocated
Pruning

73 alts after pruning (73 fresh and 0 done)

PrunedKeptTotal
New2 646492 695
Fresh182442
Picked505
Done000
Total2 669732 742
Accuracy
99.9%
Counts
2 742 → 73
Alt Table
Click to see full alt table
StatusAccuracyProgram
48.1%
(pow.f64 (pow.f64 (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1/2 binary64)) #s(literal 2 binary64))
53.9%
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))))
98.5%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)))
94.6%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (fma.f64 (/.f64 lambda2 (+.f64 lambda2 lambda1)) lambda2 (*.f64 (/.f64 lambda1 (+.f64 lambda2 lambda1)) lambda1))) (*.f64 (sin.f64 (fma.f64 (/.f64 lambda2 (+.f64 lambda2 lambda1)) lambda2 (*.f64 (/.f64 lambda1 (+.f64 lambda2 lambda1)) lambda1))) (sin.f64 (-.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)))
94.6%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 (/.f64 lambda2 (+.f64 lambda2 lambda1)) lambda2 (*.f64 (/.f64 lambda1 (+.f64 lambda2 lambda1)) lambda1))) (sin.f64 (-.f64 lambda1 lambda2))) (pow.f64 (sin.f64 (fma.f64 (/.f64 lambda2 (+.f64 lambda2 lambda1)) lambda2 (*.f64 (/.f64 lambda1 (+.f64 lambda2 lambda1)) lambda1))) #s(literal -1 binary64))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)))
52.8%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) lambda1)))
78.5%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1))) lambda1)))
93.6%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)))
93.6%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (/.f64 (*.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64)))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))) lambda1)))
74.0%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (exp.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #s(literal -1 binary64))) #s(literal -1 binary64)))) lambda1)))
77.1%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) lambda1)))
76.7%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) lambda1)))
48.0%
(/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (pow.f64 (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1/2 binary64)) #s(literal -1 binary64))))
51.6%
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)))
73.0%
(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
86.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi2))) #s(literal 1/2 binary64) (cos.f64 phi1))))
53.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))))
99.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
98.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))))
77.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
76.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
77.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
94.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (+.f64 lambda2 lambda1)) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
94.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
93.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (neg.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))))
93.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (fma.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal 1/4 binary64) (neg.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))))
93.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))))))
93.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
93.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))))
93.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))))
93.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (*.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))))
93.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
98.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
98.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
93.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))))
98.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))))
97.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
98.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))))
78.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
77.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
97.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (cos.f64 phi1)))))
97.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
76.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
76.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
63.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
89.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
39.6%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (cos (* lambda2 (/ lambda2 (+ lambda2 lambda1))))) (* (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (sin (* lambda2 (/ lambda2 (+ lambda2 lambda1))))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 phi2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
76.4%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
73.6%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (*.f64 (sin.f64 (fma.f64 (/.f64 lambda2 (+.f64 lambda2 lambda1)) lambda2 (*.f64 (/.f64 lambda1 (+.f64 lambda2 lambda1)) lambda1))) (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (fma.f64 (/.f64 lambda2 (+.f64 lambda2 lambda1)) lambda2 (*.f64 (/.f64 lambda1 (+.f64 lambda2 lambda1)) lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
75.4%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
71.7%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
76.5%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
76.5%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.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))))))))))
76.1%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))))
74.1%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 #s(approx (cos phi2) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
71.7%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (pow.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal -1 binary64)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))))))
71.7%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal -1 binary64)))))
58.5%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (exp.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #s(literal -1 binary64))) #s(literal -1 binary64)))))
74.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
62.7%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
65.0%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
64.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
76.1%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
66.1%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
75.3%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
75.9%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
75.9%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
56.5%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
73.0%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
59.5%
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))) (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)))) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1)))
98.4%
(*.f64 (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal -1 binary64))))
45.7%
(exp.f64 (log.f64 (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)))
98.5%
#s(approx (/ 1 (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1))
Compiler

Compiled 5 176 to 2 912 computations (43.7% saved)

simplify108.0ms (0.6%)

Memory
12.2MiB live, 51.2MiB allocated
Algorithm
egg-herbie
Localize:

Found 19 expressions of interest:

NewMetricScoreProgram
cost-diff0
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
cost-diff0
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))))
cost-diff14912
(fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))
cost-diff0
#s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))
cost-diff0
(atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
cost-diff0
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
cost-diff128
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
cost-diff0
(cos.f64 phi2)
cost-diff0
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
cost-diff0
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
cost-diff0
(/.f64 #s(literal 1 binary64) lambda1)
cost-diff0
#s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))
cost-diff0
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)))
cost-diff0
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
cost-diff0
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
cost-diff128
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
Rules
2 192×lower-fma.f32
2 182×lower-fma.f64
1 144×lower-*.f32
1 128×lower-*.f64
512×lower-+.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
071641
0118614
1170614
2232614
3318614
4399614
5546614
6757614
71162614
81584614
91973614
102376614
112542614
122596614
132614614
142639614
152650614
162650614
172650614
02650600
Stop Event
iter limit
saturated
iter limit
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(cos.f64 phi2)
phi2
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(sin.f64 lambda2)
lambda2
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(cos.f64 lambda2)
(sin.f64 lambda1)
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)))
#s(literal 1 binary64)
#s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))
(/.f64 #s(literal 1 binary64) lambda1)
lambda1
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(cos.f64 phi2)
phi2
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda2
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 lambda1)
(cos.f64 phi1)
phi1
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
lambda1
(atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(sin.f64 lambda1)
(cos.f64 lambda2)
lambda2
(*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))
(cos.f64 lambda1)
(neg.f64 (sin.f64 lambda2))
(sin.f64 lambda2)
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 phi2)
phi2
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))))
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(cos.f64 phi2)
phi2
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(sin.f64 lambda2)
lambda2
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(cos.f64 lambda2)
(sin.f64 lambda1)
(fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))
(sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
(cos.f64 phi1)
phi1
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(cos.f64 phi2)
phi2
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(sin.f64 lambda2)
lambda2
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(cos.f64 lambda2)
(sin.f64 lambda1)
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)))
#s(literal 1 binary64)
#s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))
(/.f64 #s(literal 1 binary64) lambda1)
lambda1
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) lambda1)
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(cos.f64 phi2)
phi2
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda2
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 lambda1)
(cos.f64 phi1)
phi1
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
lambda1
(atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))
#s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(sin.f64 lambda1)
(cos.f64 lambda2)
lambda2
(*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))
(cos.f64 lambda1)
(neg.f64 (sin.f64 lambda2))
(sin.f64 lambda2)
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(cos.f64 phi2)
phi2
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda1 lambda2)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(cos.f64 phi2)
phi2
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(sin.f64 lambda2)
lambda2
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(cos.f64 lambda2)
(sin.f64 lambda1)
(fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
(cos.f64 phi1)
phi1

localize795.0ms (4.2%)

Memory
3.7MiB live, 310.4MiB allocated
Localize:

Found 19 expressions of interest:

NewMetricScoreProgram
accuracy0.109375
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
accuracy0.11328125
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))
accuracy0.29361764967231885
(fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))
accuracy7.599037138048586
(cos.f64 (-.f64 lambda2 lambda1))
accuracy0.11328125
(atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
accuracy0.25060596623055625
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
accuracy7.599037138048586
(cos.f64 (-.f64 lambda1 lambda2))
accuracy15.043334610399306
#s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))
accuracy0.11328125
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))
accuracy0.2270271630565192
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
accuracy7.546134658760257
(sin.f64 (-.f64 lambda1 lambda2))
accuracy14.753615780617256
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
accuracy0
(/.f64 #s(literal 1 binary64) lambda1)
accuracy0.125
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)))
accuracy18.620557955629316
#s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))
accuracy0.109375
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
accuracy0.109375
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
accuracy0.11328125
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
accuracy0.25060596623055625
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
Samples
344.0ms90×1valid
177.0ms92×1invalid
97.0ms29×0invalid
50.0ms44×0valid
2.0ms2valid
Compiler

Compiled 596 to 56 computations (90.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 510.0ms
ival-cos: 241.0ms (47.3% of total)
adjust: 113.0ms (22.2% of total)
ival-mult: 47.0ms (9.2% of total)
ival-sin: 37.0ms (7.3% of total)
ival-atan2: 30.0ms (5.9% of total)
ival-add: 25.0ms (4.9% of total)
ival-div: 7.0ms (1.4% of total)
ival-sub: 4.0ms (0.8% of total)
ival-sqrt: 3.0ms (0.6% of total)
ival-neg: 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)

series273.0ms (1.4%)

Memory
27.8MiB live, 186.4MiB allocated
Counts
24 → 936
Calls
Call 1
Inputs
#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())
#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())
#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1 binary64) lambda1) (patch (/.f64 #s(literal 1 binary64) lambda1) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())
#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())
#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())
#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())
#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())
#s(alt #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (patch #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())
#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())
#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())
#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())
#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())
#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())
#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())
#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())
Outputs
#s(alt (+ (cos phi1) (* (cos lambda2) (cos phi2))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi2) (sin lambda2))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 lambda1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ lambda1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2))) (/ 1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 lambda1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (- (/ lambda1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 3)) (/ 1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2)))) (/ 1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 lambda1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (- (* lambda1 (+ (* -1 (/ lambda1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 4))) (/ 1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 3)))) (/ 1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2)))) (/ 1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 lambda1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 lambda1) (taylor 0 lambda1) (#s(alt (/.f64 #s(literal 1 binary64) lambda1) (patch (/.f64 #s(literal 1 binary64) lambda1) #<representation binary64>) () ())) ())
#s(alt (/ 1 lambda1) (taylor 0 lambda1) (#s(alt (/.f64 #s(literal 1 binary64) lambda1) (patch (/.f64 #s(literal 1 binary64) lambda1) #<representation binary64>) () ())) ())
#s(alt (/ 1 lambda1) (taylor 0 lambda1) (#s(alt (/.f64 #s(literal 1 binary64) lambda1) (patch (/.f64 #s(literal 1 binary64) lambda1) #<representation binary64>) () ())) ())
#s(alt (/ 1 lambda1) (taylor 0 lambda1) (#s(alt (/.f64 #s(literal 1 binary64) lambda1) (patch (/.f64 #s(literal 1 binary64) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi2) (sin lambda2))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (patch #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (patch #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #<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 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (patch #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #<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 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (patch #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda2) (cos phi2))) (taylor 0 lambda1) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (cos lambda2)) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (cos lambda2) (* -1/6 (* (pow lambda1 2) (cos lambda2))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* 1/120 (* (pow lambda1 2) (cos lambda2))))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (cos lambda2))) (* 1/120 (cos lambda2)))))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (sin (neg lambda2)) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2))))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos phi2)) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos phi2) (* -1/2 (* (pow lambda1 2) (cos phi2))))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda1 2) (cos phi2))))))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (cos phi2))) (* 1/24 (cos phi2)))))))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda2)) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos lambda2) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (sin lambda2))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1))) (taylor inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1))) (taylor inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1))) (taylor inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ 1 lambda1) (taylor inf lambda1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1))) lambda1) (taylor inf lambda1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ 1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2) (pow lambda1 2))) (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)) lambda1) (taylor inf lambda1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ 1 (* -1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 3) (pow lambda1 3)))) (+ (* -1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2) (pow lambda1 2))) (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1))) lambda1) (taylor inf lambda1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 lambda1) (taylor inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) lambda1) (patch (/.f64 #s(literal 1 binary64) lambda1) #<representation binary64>) () ())) ())
#s(alt (/ 1 lambda1) (taylor inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) lambda1) (patch (/.f64 #s(literal 1 binary64) lambda1) #<representation binary64>) () ())) ())
#s(alt (/ 1 lambda1) (taylor inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) lambda1) (patch (/.f64 #s(literal 1 binary64) lambda1) #<representation binary64>) () ())) ())
#s(alt (/ 1 lambda1) (taylor inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) lambda1) (patch (/.f64 #s(literal 1 binary64) lambda1) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (patch #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (patch #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (patch #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (patch #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ 1 lambda1) (taylor -inf lambda1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1) 1) lambda1)) (taylor -inf lambda1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* -1 (/ (- (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) 2) lambda1) (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))) lambda1)) 1) lambda1)) (taylor -inf lambda1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) 3) lambda1) (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) 2)) lambda1)) (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))) lambda1)) 1) lambda1)) (taylor -inf lambda1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 lambda1) (taylor -inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) lambda1) (patch (/.f64 #s(literal 1 binary64) lambda1) #<representation binary64>) () ())) ())
#s(alt (/ 1 lambda1) (taylor -inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) lambda1) (patch (/.f64 #s(literal 1 binary64) lambda1) #<representation binary64>) () ())) ())
#s(alt (/ 1 lambda1) (taylor -inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) lambda1) (patch (/.f64 #s(literal 1 binary64) lambda1) #<representation binary64>) () ())) ())
#s(alt (/ 1 lambda1) (taylor -inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) lambda1) (patch (/.f64 #s(literal 1 binary64) lambda1) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (patch #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (patch #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (patch #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (patch #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 lambda2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 lambda2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 lambda2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 lambda2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (patch #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (patch #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (patch #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (patch #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (taylor 0 lambda2) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* -1 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* (cos phi2) (cos (neg lambda1))))) (taylor 0 lambda2) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1))))) (taylor 0 lambda2) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi2) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi2) (sin (neg lambda1))))))))) (* (cos phi2) (cos (neg lambda1))))) (taylor 0 lambda2) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1/2 (* (pow lambda2 2) (sin lambda1)))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* 1/24 (* (pow lambda2 2) (sin lambda1)))))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (sin lambda1))) (* 1/24 (sin lambda1))))))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1)))))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1)))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos lambda1) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (sin lambda1))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda1)) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf lambda2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf lambda2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf lambda2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf lambda2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (patch #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (patch #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (patch #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (patch #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda2) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda2) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda2) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda2) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))) (taylor -inf lambda2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))) (taylor -inf lambda2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))) (taylor -inf lambda2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))) (taylor -inf lambda2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (patch #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (patch #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (patch #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (patch #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* -1/2 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1)))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 phi2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 phi2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 phi2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 phi2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2))))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (pow phi2 2))) (taylor 0 phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2))) (taylor 0 phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2))) (taylor 0 phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2))))))))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (patch #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1)))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (patch #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (patch #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (patch #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (- lambda2 lambda1))) (taylor 0 phi2) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi2 2) (cos (- lambda2 lambda1)))))) (taylor 0 phi2) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi2 2) (cos (- lambda2 lambda1)))))))) (taylor 0 phi2) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1))))))))) (taylor 0 phi2) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2))))))))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (cos phi1)) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (+ (cos phi1) (* -1/2 (* (pow phi2 2) (cos lambda1))))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* 1/24 (* (pow phi2 2) (cos lambda1))))))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda1))) (* 1/24 (cos lambda1)))))))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf phi2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf phi2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf phi2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf phi2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (patch #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (patch #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (patch #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (patch #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi2) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi2) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi2) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi2) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor -inf phi2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor -inf phi2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor -inf phi2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor -inf phi2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor -inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor -inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor -inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor -inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (patch #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (patch #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (patch #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (patch #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi2) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi2) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi2) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi2) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 phi1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 phi1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 phi1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 phi1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor 0 phi1) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 phi1) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda2 lambda1))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda2 lambda1))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos lambda1) (cos phi2))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos lambda1) (cos phi2)))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf phi1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf phi1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf phi1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf phi1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi1) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi1) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi1) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi1) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor -inf phi1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor -inf phi1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor -inf phi1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor -inf phi1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi1) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi1) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi1) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi1) (#s(alt (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) (patch (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
Calls

12 calls:

TimeVariablePointExpression
95.0ms
lambda2
@-inf
((+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (/ 1 (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1))) (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/ 1 lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1))) (* (cos lambda2) (sin lambda1)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (sin (- lambda1 lambda2)) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (cos (- lambda1 lambda2)) (cos (- lambda2 lambda1)))
85.0ms
phi1
@inf
((+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (/ 1 (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1))) (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/ 1 lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1))) (* (cos lambda2) (sin lambda1)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (sin (- lambda1 lambda2)) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (cos (- lambda1 lambda2)) (cos (- lambda2 lambda1)))
16.0ms
phi2
@-inf
((+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (/ 1 (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1))) (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/ 1 lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1))) (* (cos lambda2) (sin lambda1)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (sin (- lambda1 lambda2)) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (cos (- lambda1 lambda2)) (cos (- lambda2 lambda1)))
5.0ms
phi2
@inf
((+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (/ 1 (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1))) (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/ 1 lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1))) (* (cos lambda2) (sin lambda1)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (sin (- lambda1 lambda2)) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (cos (- lambda1 lambda2)) (cos (- lambda2 lambda1)))
4.0ms
lambda1
@-inf
((+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (/ 1 (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1))) (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/ 1 lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1))) (* (cos lambda2) (sin lambda1)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (sin (- lambda1 lambda2)) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (cos (- lambda1 lambda2)) (cos (- lambda2 lambda1)))

simplify227.0ms (1.2%)

Memory
-1.3MiB live, 314.3MiB allocated
Algorithm
egg-herbie
Rules
8 720×lower-fma.f64
8 720×lower-fma.f32
6 228×lower-*.f64
6 228×lower-*.f32
2 452×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
061518323
1193017734
2562017707
0803616652
Stop Event
iter limit
node limit
Counts
936 → 926
Calls
Call 1
Inputs
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(+ (cos phi1) (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))
(+ (cos phi1) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* -1 (* (cos phi2) (sin lambda2)))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/ 1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ (* -1 (/ lambda1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2))) (/ 1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(+ (* lambda1 (- (/ lambda1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 3)) (/ 1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2)))) (/ 1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(+ (* lambda1 (- (* lambda1 (+ (* -1 (/ lambda1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 4))) (/ 1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 3)))) (/ 1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2)))) (/ 1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 lambda1)
(/ 1 lambda1)
(/ 1 lambda1)
(/ 1 lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (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 phi1) (* (cos phi2) (cos (neg lambda2))))
(+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* -1 (* (cos phi2) (sin lambda2)))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(+ (cos phi1) (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))
(+ (cos phi1) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(* lambda1 (cos lambda2))
(* lambda1 (+ (cos lambda2) (* -1/6 (* (pow lambda1 2) (cos lambda2)))))
(* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* 1/120 (* (pow lambda1 2) (cos lambda2)))))))
(* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (cos lambda2))) (* 1/120 (cos lambda2))))))))
(+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))))
(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 phi1) (cos phi2))
(+ (cos phi1) (+ (cos phi2) (* -1/2 (* (pow lambda1 2) (cos phi2)))))
(+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda1 2) (cos phi2)))))))
(+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (cos phi2))) (* 1/24 (cos phi2))))))))
(cos (neg lambda2))
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(cos lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)))
(/ 1 lambda1)
(/ (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1))) lambda1)
(/ (- (+ 1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2) (pow lambda1 2))) (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)) lambda1)
(/ (- (+ 1 (* -1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 3) (pow lambda1 3)))) (+ (* -1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2) (pow lambda1 2))) (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1))) lambda1)
(/ 1 lambda1)
(/ 1 lambda1)
(/ 1 lambda1)
(/ 1 lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1)))
(/ 1 lambda1)
(* -1 (/ (- (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1) 1) lambda1))
(* -1 (/ (- (* -1 (/ (- (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) 2) lambda1) (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))) lambda1)) 1) lambda1))
(* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) 3) lambda1) (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) 2)) lambda1)) (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))) lambda1)) 1) lambda1))
(/ 1 lambda1)
(/ 1 lambda1)
(/ 1 lambda1)
(/ 1 lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* (cos phi2) (sin lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(+ (cos phi1) (* (cos phi2) (cos (neg lambda1))))
(+ (cos phi1) (+ (* -1 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* (cos phi2) (cos (neg lambda1)))))
(+ (cos phi1) (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1)))))
(+ (cos phi1) (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi2) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi2) (sin (neg lambda1))))))))) (* (cos phi2) (cos (neg lambda1)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(sin lambda1)
(+ (sin lambda1) (* -1/2 (* (pow lambda2 2) (sin lambda1))))
(+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* 1/24 (* (pow lambda2 2) (sin lambda1))))))
(+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (sin lambda1))) (* 1/24 (sin lambda1)))))))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(sin lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(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 (neg lambda1))
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(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 (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(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 (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (cos phi1) (+ (* -1/2 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(sin (- lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
1
(+ 1 (* -1/2 (pow phi2 2)))
(+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))
(+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))))
(+ (cos phi1) (cos (- lambda2 lambda1)))
(+ (cos phi1) (+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi2 2) (cos (- lambda2 lambda1))))))
(+ (cos phi1) (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi2 2) (cos (- lambda2 lambda1))))))))
(+ (cos phi1) (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1)))))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))
(+ (cos lambda1) (cos phi1))
(+ (cos lambda1) (+ (cos phi1) (* -1/2 (* (pow phi2 2) (cos lambda1)))))
(+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* 1/24 (* (pow phi2 2) (cos lambda1)))))))
(+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda1))) (* 1/24 (cos lambda1))))))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(cos phi2)
(cos phi2)
(cos phi2)
(cos phi2)
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(cos phi2)
(cos phi2)
(cos phi2)
(cos phi2)
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda2 lambda1)))))
(+ 1 (+ (* (cos phi2) (cos (- lambda2 lambda1))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(+ 1 (+ (* (cos phi2) (cos (- lambda2 lambda1))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(+ 1 (* (cos lambda1) (cos phi2)))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos lambda1) (cos phi2))))
(+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
Outputs
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (sin.f64 lambda2) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (cos.f64 phi2))) lambda1 (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(* -1 (* (cos phi2) (sin lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))
(*.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))
(fma.f64 (*.f64 lambda1 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.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 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 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(/ 1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))
(+ (* -1 (/ lambda1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2))) (/ 1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(-.f64 (/.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))) (/.f64 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))))
(+ (* lambda1 (- (/ lambda1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 3)) (/ 1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2)))) (/ 1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(fma.f64 (-.f64 (/.f64 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) lambda1 (/.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))))
(+ (* lambda1 (- (* lambda1 (+ (* -1 (/ lambda1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 4))) (/ 1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 3)))) (/ 1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2)))) (/ 1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(fma.f64 (fma.f64 (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))) (/.f64 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 4 binary64)))) lambda1 (/.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) lambda1 (/.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))))
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (neg lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(*.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (*.f64 lambda1 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.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 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 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1))
(+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (neg.f64 (sin.f64 lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (cos.f64 phi2))) lambda1 (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* -1 (* (cos phi2) (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 lambda1 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.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 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 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (sin.f64 lambda2) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (cos.f64 phi2))) lambda1 (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* lambda1 (cos lambda2))
(*.f64 lambda1 (cos.f64 lambda2))
(* lambda1 (+ (cos lambda2) (* -1/6 (* (pow lambda1 2) (cos lambda2)))))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 lambda2)) lambda1)
(* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* 1/120 (* (pow lambda1 2) (cos lambda2)))))))
(fma.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (*.f64 (cos.f64 lambda2) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda1 lambda1) #s(literal -1/6 binary64))) (*.f64 lambda1 (cos.f64 lambda2)))
(* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (cos lambda2))) (* 1/120 (cos lambda2))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 lambda2) (*.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (*.f64 (cos.f64 lambda2) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda1 lambda1) #s(literal 1/120 binary64))))) lambda1)
(+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1))
(+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (neg.f64 (sin.f64 lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (cos.f64 phi2))) lambda1 (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1)))
(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) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 lambda2)) lambda1 (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (cos phi1) (cos phi2))
(+.f64 (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (cos phi2) (* -1/2 (* (pow lambda1 2) (cos phi2)))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda1 2) (cos phi2)))))))
(fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 #s(literal 1/24 binary64) (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (*.f64 lambda1 lambda1) (+.f64 (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (cos phi2))) (* 1/24 (cos phi2))))))))
(+.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/720 binary64) (*.f64 lambda1 lambda1) #s(literal 1/24 binary64)))))
(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 lambda2)
(cos.f64 lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda2) lambda1) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
(/ (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1))) lambda1)
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) lambda1)
(/ (- (+ 1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2) (pow lambda1 2))) (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)) lambda1)
(/.f64 (+.f64 (/.f64 (-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) lambda1) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))) lambda1) #s(literal 1 binary64)) lambda1)
(/ (- (+ 1 (* -1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 3) (pow lambda1 3)))) (+ (* -1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2) (pow lambda1 2))) (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1))) lambda1)
(/.f64 (+.f64 (/.f64 (-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) lambda1) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))) lambda1) (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 3 binary64)))) lambda1)
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(cos (- 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 (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
(* -1 (/ (- (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1) 1) lambda1))
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) lambda1)
(* -1 (/ (- (* -1 (/ (- (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) 2) lambda1) (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))) lambda1)) 1) lambda1))
(/.f64 (+.f64 (/.f64 (-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) lambda1) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))) lambda1) #s(literal 1 binary64)) lambda1)
(* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) 3) lambda1) (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) 2)) lambda1)) (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))) lambda1)) 1) lambda1))
(/.f64 (+.f64 (/.f64 (-.f64 (neg.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))) (/.f64 (-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))) lambda1)) lambda1) #s(literal 1 binary64)) lambda1)
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(cos (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 (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(fma.f64 (*.f64 (cos.f64 phi2) lambda2) (sin.f64 lambda1) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (*.f64 lambda2 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi2) lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) (cos.f64 phi2))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (*.f64 lambda2 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (sin.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 phi2) lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64)) (cos.f64 phi2))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (*.f64 lambda2 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (sin.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 phi2) lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64)) (cos.f64 phi2))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(fma.f64 (*.f64 (cos.f64 phi2) lambda2) (sin.f64 lambda1) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (*.f64 lambda2 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi2) lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) (cos.f64 phi2))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (*.f64 lambda2 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (sin.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 phi2) lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64)) (cos.f64 phi2))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (cos phi1) (* (cos phi2) (cos (neg lambda1))))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* -1 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* (cos phi2) (cos (neg lambda1)))))
(fma.f64 (*.f64 (cos.f64 phi2) lambda2) (sin.f64 lambda1) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1)))))
(fma.f64 (fma.f64 (*.f64 lambda2 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi2) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi2) (sin (neg lambda1))))))))) (* (cos phi2) (cos (neg lambda1)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 phi2) lambda2)) (neg.f64 (sin.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) (cos.f64 phi2))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1/2 (* (pow lambda2 2) (sin lambda1))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) lambda2 #s(literal 1 binary64)) (sin.f64 lambda1))
(+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* 1/24 (* (pow lambda2 2) (sin lambda1))))))
(fma.f64 (*.f64 (sin.f64 lambda1) (fma.f64 (*.f64 lambda2 lambda2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 lambda2 lambda2) (sin.f64 lambda1))
(+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (sin lambda1))) (* 1/24 (sin lambda1)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) lambda2 #s(literal 1 binary64)) (sin.f64 lambda1) (*.f64 (pow.f64 lambda2 #s(literal 4 binary64)) (*.f64 (sin.f64 lambda1) (fma.f64 (*.f64 lambda2 lambda2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(fma.f64 (*.f64 (cos.f64 phi2) lambda2) (sin.f64 lambda1) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (*.f64 lambda2 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi2) lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) (cos.f64 phi2))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (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 (neg lambda1))
(cos.f64 lambda1)
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (neg.f64 (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(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 (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* -1/2 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(+.f64 (fma.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (cos.f64 phi1))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))))
(+.f64 (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (pow.f64 phi2 #s(literal 4 binary64)) (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64))))) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1))))
(fma.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))
(fma.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))))
(fma.f64 (fma.f64 (*.f64 (pow.f64 phi2 #s(literal 4 binary64)) #s(literal -1/720 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)))) (*.f64 phi2 phi2) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 4 binary64)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (pow phi2 2)))
(fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))
(+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))
(+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))
(fma.f64 (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))
(+.f64 (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (pow.f64 phi2 #s(literal 4 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1))))
(fma.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))
(fma.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))))
(fma.f64 (fma.f64 (*.f64 (pow.f64 phi2 #s(literal 4 binary64)) #s(literal -1/720 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)))) (*.f64 phi2 phi2) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(+ (cos phi1) (cos (- lambda2 lambda1)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi2 2) (cos (- lambda2 lambda1))))))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi2 2) (cos (- lambda2 lambda1))))))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(+ (cos phi1) (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1)))))))))
(+.f64 (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (pow.f64 phi2 #s(literal 4 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))
(+.f64 (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (pow.f64 phi2 #s(literal 4 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))))
(+ (cos lambda1) (cos phi1))
(+.f64 (cos.f64 lambda1) (cos.f64 phi1))
(+ (cos lambda1) (+ (cos phi1) (* -1/2 (* (pow phi2 2) (cos lambda1)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) phi2) phi2 (+.f64 (cos.f64 lambda1) (cos.f64 phi1)))
(+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* 1/24 (* (pow phi2 2) (cos lambda1)))))))
(fma.f64 (*.f64 (cos.f64 lambda1) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (+.f64 (cos.f64 lambda1) (cos.f64 phi1)))
(+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda1))) (* 1/24 (cos lambda1))))))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (+.f64 (cos.f64 lambda1) (cos.f64 phi1)))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(fma.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi1 phi1) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) #s(literal 1 binary64)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(fma.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi1 phi1) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda2 lambda1)))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (cos (- lambda2 lambda1))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (cos (- lambda2 lambda1))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(fma.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi1 phi1) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(fma.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi1 phi1) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos lambda1) (cos phi2))))
(fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(fma.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi1 phi1) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64)))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))

rewrite188.0ms (1%)

Memory
8.4MiB live, 284.2MiB allocated
Rules
4 342×lower-*.f32
4 330×lower-*.f64
3 940×lower-/.f32
3 936×lower-/.f64
3 600×lower-fma.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
071457
0119419
1399335
22638335
09076321
Stop Event
iter limit
node limit
iter limit
Counts
24 → 689
Calls
Call 1
Inputs
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)))
#s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1))
(/.f64 #s(literal 1 binary64) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(cos.f64 phi2)
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))
(fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))))
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1)))
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(sin.f64 (-.f64 lambda1 lambda2))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
Outputs
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>

eval323.0ms (1.7%)

Memory
-8.9MiB live, 574.2MiB allocated
Compiler

Compiled 69 079 to 3 773 computations (94.5% saved)

prune230.0ms (1.2%)

Memory
8.0MiB live, 385.2MiB allocated
Pruning

91 alts after pruning (90 fresh and 1 done)

PrunedKeptTotal
New1 906391 945
Fresh175168
Picked415
Done000
Total1 927912 018
Accuracy
99.9%
Counts
2 018 → 91
Alt Table
Click to see full alt table
StatusAccuracyProgram
48.1%
(pow.f64 (pow.f64 (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1/2 binary64)) #s(literal 2 binary64))
22.6%
(pow.f64 (pow.f64 #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal -1 binary64))) #s(literal -1/2 binary64)) #s(literal 2 binary64))
15.9%
(pow.f64 (*.f64 #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal -1 binary64))) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal -1 binary64)))) #s(literal -1/2 binary64))
53.9%
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))))
98.5%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)))
94.6%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (fma.f64 (/.f64 lambda2 (+.f64 lambda2 lambda1)) lambda2 (*.f64 (/.f64 lambda1 (+.f64 lambda2 lambda1)) lambda1))) (*.f64 (sin.f64 (fma.f64 (/.f64 lambda2 (+.f64 lambda2 lambda1)) lambda2 (*.f64 (/.f64 lambda1 (+.f64 lambda2 lambda1)) lambda1))) (sin.f64 (-.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)))
94.6%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 (/.f64 lambda2 (+.f64 lambda2 lambda1)) lambda2 (*.f64 (/.f64 lambda1 (+.f64 lambda2 lambda1)) lambda1))) (sin.f64 (-.f64 lambda1 lambda2))) (pow.f64 (sin.f64 (fma.f64 (/.f64 lambda2 (+.f64 lambda2 lambda1)) lambda2 (*.f64 (/.f64 lambda1 (+.f64 lambda2 lambda1)) lambda1))) #s(literal -1 binary64))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)))
93.6%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)))
93.6%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (/.f64 (*.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64)))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))) lambda1)))
74.0%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (exp.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #s(literal -1 binary64))) #s(literal -1 binary64)))) lambda1)))
76.7%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) lambda1)))
48.0%
(/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (pow.f64 (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1/2 binary64)) #s(literal -1 binary64))))
22.6%
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (pow.f64 lambda1 #s(literal -1/2 binary64)) #s(literal 2 binary64))))
15.5%
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))))
51.6%
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)))
20.8%
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (exp.f64 (*.f64 (log.f64 lambda1) #s(literal -1 binary64)))))
46.7%
(+.f64 lambda1 (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))) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))))
62.8%
(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
73.0%
(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
40.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (pow.f64 (sqrt.f64 (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))))
86.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi2))) #s(literal 1/2 binary64) (cos.f64 phi1))))
83.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (fabs.f64 (cos.f64 (-.f64 lambda2 lambda1))) (fabs.f64 (cos.f64 phi2)) (cos.f64 phi1))))
71.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sqrt.f64 (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
98.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))))
77.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
76.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
77.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
99.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
77.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) #s(literal 1 binary64)))))
77.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))))
98.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (* (cos lambda2) (sin lambda1)) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
94.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (+.f64 lambda2 lambda1)) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
72.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (+.f64 lambda1 lambda2)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
94.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
93.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (neg.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))))
93.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (fma.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal 1/4 binary64) (neg.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))))
93.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))))))
93.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
93.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))))
93.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))))
93.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (*.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))))
98.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
98.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
98.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))))
97.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
98.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))))
78.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
77.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
97.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (cos.f64 phi1)))))
97.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1)))))
70.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))))))
70.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)))))))
76.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64)))))))
70.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)))))))
76.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
75.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1))))))
75.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 #s(literal 1/24 binary64) (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (*.f64 lambda1 lambda1) (+.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
66.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64))))))
75.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1))))))
66.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
63.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
63.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
68.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
65.3%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
39.6%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (cos (* lambda2 (/ lambda2 (+ lambda2 lambda1))))) (* (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (sin (* lambda2 (/ lambda2 (+ lambda2 lambda1))))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 phi2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
76.5%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))))))
76.2%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))))
64.9%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
76.1%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1)))))
75.3%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
47.9%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))))
73.6%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (*.f64 (sin.f64 (fma.f64 (/.f64 lambda2 (+.f64 lambda2 lambda1)) lambda2 (*.f64 (/.f64 lambda1 (+.f64 lambda2 lambda1)) lambda1))) (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (fma.f64 (/.f64 lambda2 (+.f64 lambda2 lambda1)) lambda2 (*.f64 (/.f64 lambda1 (+.f64 lambda2 lambda1)) lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
71.7%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
76.5%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
76.1%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))))
71.7%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (pow.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal -1 binary64)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))))))
71.7%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal -1 binary64)))))
58.5%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (exp.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #s(literal -1 binary64))) #s(literal -1 binary64)))))
74.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
65.0%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
64.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
76.1%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
66.1%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
75.3%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
75.9%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
73.0%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
59.5%
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))) (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)))) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1)))
98.4%
(*.f64 (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal -1 binary64))))
20.8%
(exp.f64 (*.f64 (log.f64 #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal -1 binary64)))) #s(literal -1 binary64)))
45.7%
(exp.f64 (log.f64 (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)))
98.5%
#s(approx (/ 1 (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1))
Compiler

Compiled 5 976 to 3 522 computations (41.1% saved)

simplify158.0ms (0.8%)

Memory
11.6MiB live, 164.9MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
cost-diff0
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
cost-diff33664
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
cost-diff0
(cos.f64 phi2)
cost-diff0
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
cost-diff0
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
cost-diff0
(cos.f64 phi2)
cost-diff0
(*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)))
cost-diff0
(atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
cost-diff0
(*.f64 lambda1 lambda1)
cost-diff0
(pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))
cost-diff0
#s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))
cost-diff0
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))))
cost-diff0
(cos.f64 phi2)
cost-diff0
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
cost-diff0
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
Rules
11 964×lower-fma.f32
11 956×lower-fma.f64
3 714×lower-*.f32
3 700×lower-*.f64
1 778×lower-+.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
078738
0128702
1187702
2281702
3452663
4738657
51492657
63696657
76831657
08077646
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(cos.f64 phi2)
phi2
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(sin.f64 lambda2)
lambda2
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(cos.f64 lambda2)
(sin.f64 lambda1)
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(cos.f64 phi1)
phi1
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))))
#s(literal 1 binary64)
#s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))
(pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))
(*.f64 lambda1 lambda1)
lambda1
#s(literal -1/2 binary64)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))
(*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)))
(cos.f64 phi2)
phi2
#s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))
(sin.f64 lambda1)
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 lambda1)
(cos.f64 phi1)
phi1
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(cos.f64 phi2)
phi2
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(sin.f64 lambda2)
lambda2
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(cos.f64 lambda2)
(sin.f64 lambda1)
#s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(cos.f64 phi1)
phi1
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(cos.f64 phi2)
phi2
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda2
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
#s(literal 2 binary64)
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(cos.f64 phi1)
phi1
(-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))) lambda1)
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(cos.f64 phi2)
phi2
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(sin.f64 lambda2)
lambda2
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(cos.f64 lambda2)
(sin.f64 lambda1)
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(cos.f64 phi1)
phi1
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))))
#s(literal 1 binary64)
#s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))
(pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))
(*.f64 lambda1 lambda1)
lambda1
#s(literal -1/2 binary64)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) lambda1)
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))
(*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)))
(*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2))
(cos.f64 phi2)
phi2
#s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))
(sin.f64 lambda1)
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 lambda1)
(cos.f64 phi1)
phi1
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(cos.f64 phi2)
phi2
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(sin.f64 lambda2)
lambda2
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(cos.f64 lambda2)
(sin.f64 lambda1)
#s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda1 lambda2)
(cos.f64 phi1)
phi1
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(cos.f64 phi2)
phi2
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda2
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
#s(literal 2 binary64)
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(cos.f64 phi1)
phi1
(-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))

localize494.0ms (2.6%)

Memory
-15.9MiB live, 670.6MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy2.912443485088199
(-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
accuracy2.936671199423936
(-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
accuracy7.546134658760257
(sin.f64 (-.f64 lambda1 lambda2))
accuracy7.599037138048586
(cos.f64 (-.f64 lambda2 lambda1))
accuracy0.11328125
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
accuracy0.3403059143300999
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
accuracy7.599037138048586
(cos.f64 (-.f64 lambda1 lambda2))
accuracy14.284922685226697
#s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
accuracy0.11328125
(atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))
accuracy0.2270271630565192
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
accuracy14.753615780617256
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
accuracy22.09157322989223
#s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))
accuracy0
(*.f64 lambda1 lambda1)
accuracy0.125
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))))
accuracy14.355184886848527
(pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))
accuracy26.199674256716648
#s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))
accuracy0.109375
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
accuracy0.109375
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
accuracy0.11328125
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))
accuracy0.2593444005950127
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
Samples
214.0ms92×1invalid
173.0ms97×1valid
19.0ms35×0valid
16.0ms29×0invalid
6.0ms2valid
Compiler

Compiled 632 to 66 computations (89.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 375.0ms
ival-cos: 134.0ms (35.7% of total)
ival-add: 47.0ms (12.5% of total)
ival-mult: 42.0ms (11.2% of total)
adjust: 39.0ms (10.4% of total)
ival-sin: 39.0ms (10.4% of total)
ival-atan2: 35.0ms (9.3% of total)
ival-pow: 10.0ms (2.7% of total)
ival-pow2: 8.0ms (2.1% of total)
ival-sub: 8.0ms (2.1% of total)
ival-div: 8.0ms (2.1% of total)
ival-sqrt: 3.0ms (0.8% of total)
ival-neg: 2.0ms (0.5% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series189.0ms (1%)

Memory
8.4MiB live, 201.9MiB allocated
Counts
29 → 1 104
Calls
Call 1
Inputs
#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())
#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())
#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())
#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())
#s(alt (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)) (patch (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 lambda1 lambda1) (patch (*.f64 lambda1 lambda1) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())
#s(alt (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())
#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())
#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())
#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())
#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())
#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())
#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())
#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())
#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())
#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())
#s(alt (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())
#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())
#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())
#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())
Outputs
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi2) (sin lambda2))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 lambda1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ lambda1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2))) (/ 1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 lambda1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (- (/ lambda1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 3)) (/ 1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2)))) (/ 1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 lambda1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (- (* lambda1 (+ (* -1 (/ lambda1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 4))) (/ 1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 3)))) (/ 1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2)))) (/ 1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 lambda1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 lambda1) (taylor 0 lambda1) (#s(alt (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)) (patch (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ 1 lambda1) (taylor 0 lambda1) (#s(alt (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)) (patch (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ 1 lambda1) (taylor 0 lambda1) (#s(alt (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)) (patch (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ 1 lambda1) (taylor 0 lambda1) (#s(alt (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)) (patch (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow lambda1 2) (taylor 0 lambda1) (#s(alt (*.f64 lambda1 lambda1) (patch (*.f64 lambda1 lambda1) #<representation binary64>) () ())) ())
#s(alt (pow lambda1 2) (taylor 0 lambda1) (#s(alt (*.f64 lambda1 lambda1) (patch (*.f64 lambda1 lambda1) #<representation binary64>) () ())) ())
#s(alt (pow lambda1 2) (taylor 0 lambda1) (#s(alt (*.f64 lambda1 lambda1) (patch (*.f64 lambda1 lambda1) #<representation binary64>) () ())) ())
#s(alt (pow lambda1 2) (taylor 0 lambda1) (#s(alt (*.f64 lambda1 lambda1) (patch (*.f64 lambda1 lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch (*.f64 (cos.f64 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 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch (*.f64 (cos.f64 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 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch (*.f64 (cos.f64 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 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (- (* (cos lambda2) (cos phi2)) (cos phi1))) (taylor 0 lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda1 (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2)))) (/ (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (taylor 0 lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda1 (- (+ (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (* lambda1 (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))) (- (* (cos lambda2) (cos phi2)) (cos phi1))) (+ (* -1/2 (/ (* (cos lambda2) (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))) (/ (* (cos phi2) (* (sin lambda2) (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))))) (- (* (cos lambda2) (cos phi2)) (cos phi1))))))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2)))) (/ (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (taylor 0 lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda1 (- (+ (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (* lambda1 (- (+ (* lambda1 (- (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda2) (sin lambda2))) (* -1/3 (* (cos lambda2) (sin lambda2))))) (- (* (cos lambda2) (cos phi2)) (cos phi1))) (+ (* -1/2 (/ (* (cos lambda2) (* (cos phi2) (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (+ (* -1/6 (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))) (/ (* (cos phi2) (* (sin lambda2) (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))) (- (* (cos lambda2) (cos phi2)) (cos phi1))) (+ (* -1/2 (/ (* (cos lambda2) (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))) (/ (* (cos phi2) (* (sin lambda2) (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))))) (- (* (cos lambda2) (cos phi2)) (cos phi1))))))) (- (* (cos lambda2) (cos phi2)) (cos phi1))))))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (+ (* -1/2 (/ (* (cos lambda2) (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))) (/ (* (cos phi2) (* (sin lambda2) (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))))) (- (* (cos lambda2) (cos phi2)) (cos phi1))))))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2)))) (/ (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (taylor 0 lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda2) (cos phi2))) (taylor 0 lambda1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (cos lambda2)) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (cos lambda2) (* -1/6 (* (pow lambda1 2) (cos lambda2))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* 1/120 (* (pow lambda1 2) (cos lambda2))))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (cos lambda2))) (* 1/120 (cos lambda2)))))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (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 (+ (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos phi2)) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos phi2) (* -1/2 (* (pow lambda1 2) (cos phi2))))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda1 2) (cos phi2))))))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (cos phi2))) (* 1/24 (cos phi2)))))))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda2) (cos phi2))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda2)) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (neg lambda2))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos lambda2) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (sin lambda2))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (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 (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (taylor 0 lambda1) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 2 (* lambda1 (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))))) (* (pow (cos lambda2) 2) (pow (cos phi2) 2))) (pow (cos phi1) 2)) (taylor 0 lambda1) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda1 (+ (* 2 (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2)))) (* lambda1 (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))))) (* (pow (cos lambda2) 2) (pow (cos phi2) 2))) (pow (cos phi1) 2)) (taylor 0 lambda1) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda1 (+ (* 2 (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2)))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda2) (sin lambda2))) (* -1/3 (* (cos lambda2) (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))))))) (* (pow (cos lambda2) 2) (pow (cos phi2) 2))) (pow (cos phi1) 2)) (taylor 0 lambda1) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (cos phi2)) (cos phi1)) (taylor 0 lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))) (cos phi1)) (taylor 0 lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))) (cos phi1)) (taylor 0 lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))) (cos phi1)) (taylor 0 lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1))) (taylor inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1))) (taylor inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1))) (taylor inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 lambda1) (taylor inf lambda1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1))) lambda1) (taylor inf lambda1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ 1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2) (pow lambda1 2))) (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)) lambda1) (taylor inf lambda1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ 1 (* -1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 3) (pow lambda1 3)))) (+ (* -1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2) (pow lambda1 2))) (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1))) lambda1) (taylor inf lambda1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 lambda1) (taylor inf lambda1) (#s(alt (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)) (patch (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ 1 lambda1) (taylor inf lambda1) (#s(alt (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)) (patch (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ 1 lambda1) (taylor inf lambda1) (#s(alt (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)) (patch (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ 1 lambda1) (taylor inf lambda1) (#s(alt (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)) (patch (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow lambda1 2) (taylor inf lambda1) (#s(alt (*.f64 lambda1 lambda1) (patch (*.f64 lambda1 lambda1) #<representation binary64>) () ())) ())
#s(alt (pow lambda1 2) (taylor inf lambda1) (#s(alt (*.f64 lambda1 lambda1) (patch (*.f64 lambda1 lambda1) #<representation binary64>) () ())) ())
#s(alt (pow lambda1 2) (taylor inf lambda1) (#s(alt (*.f64 lambda1 lambda1) (patch (*.f64 lambda1 lambda1) #<representation binary64>) () ())) ())
#s(alt (pow lambda1 2) (taylor inf lambda1) (#s(alt (*.f64 lambda1 lambda1) (patch (*.f64 lambda1 lambda1) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))) (taylor inf lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))) (taylor inf lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))) (taylor inf lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))) (taylor inf lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (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 (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (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 (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (taylor inf lambda1) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (taylor inf lambda1) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (taylor inf lambda1) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (taylor inf lambda1) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)) (taylor inf lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)) (taylor inf lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)) (taylor inf lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)) (taylor inf lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 lambda1) (taylor -inf lambda1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1) 1) lambda1)) (taylor -inf lambda1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* -1 (/ (- (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) 2) lambda1) (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))) lambda1)) 1) lambda1)) (taylor -inf lambda1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) 3) lambda1) (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) 2)) lambda1)) (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))) lambda1)) 1) lambda1)) (taylor -inf lambda1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ -1 lambda1) (taylor -inf lambda1) (#s(alt (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)) (patch (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ -1 lambda1) (taylor -inf lambda1) (#s(alt (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)) (patch (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ -1 lambda1) (taylor -inf lambda1) (#s(alt (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)) (patch (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ -1 lambda1) (taylor -inf lambda1) (#s(alt (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)) (patch (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow lambda1 2) (taylor -inf lambda1) (#s(alt (*.f64 lambda1 lambda1) (patch (*.f64 lambda1 lambda1) #<representation binary64>) () ())) ())
#s(alt (pow lambda1 2) (taylor -inf lambda1) (#s(alt (*.f64 lambda1 lambda1) (patch (*.f64 lambda1 lambda1) #<representation binary64>) () ())) ())
#s(alt (pow lambda1 2) (taylor -inf lambda1) (#s(alt (*.f64 lambda1 lambda1) (patch (*.f64 lambda1 lambda1) #<representation binary64>) () ())) ())
#s(alt (pow lambda1 2) (taylor -inf lambda1) (#s(alt (*.f64 lambda1 lambda1) (patch (*.f64 lambda1 lambda1) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch (*.f64 (cos.f64 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 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch (*.f64 (cos.f64 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 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch (*.f64 (cos.f64 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 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1))) (taylor -inf lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1))) (taylor -inf lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1))) (taylor -inf lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1))) (taylor -inf lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1)))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1)))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1)))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1)))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1)))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1)))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1)))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (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 (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (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 (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (taylor -inf lambda1) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (taylor -inf lambda1) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (taylor -inf lambda1) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (taylor -inf lambda1) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1)) (taylor -inf lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1)) (taylor -inf lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1)) (taylor -inf lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1)) (taylor -inf lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 lambda2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 lambda2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 lambda2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 lambda2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch (*.f64 (cos.f64 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 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch (*.f64 (cos.f64 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 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch (*.f64 (cos.f64 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 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1))) (taylor 0 lambda2) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda2 (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (taylor 0 lambda2) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* lambda2 (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2)))))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (taylor 0 lambda2) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* lambda2 (- (+ (* lambda2 (- (/ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda1)) (sin (neg lambda1)))) (* (cos (neg lambda1)) (sin (neg lambda1))))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2)))))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (+ (* -1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2)))))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* 1/6 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2)))))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (taylor 0 lambda2) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor 0 lambda2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1/2 (* (pow lambda2 2) (sin lambda1)))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* 1/24 (* (pow lambda2 2) (sin lambda1)))))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (sin lambda1))) (* 1/24 (sin lambda1))))))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1)))))) (taylor 0 lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1)))))))) (taylor 0 lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* -1 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* (cos phi2) (cos (neg lambda1))))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1))))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi2) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi2) (sin (neg lambda1))))))))) (* (cos phi2) (cos (neg lambda1))))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<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 phi1)) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (+ (cos phi1) (* lambda2 (sin lambda1)))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (+ (cos phi1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (+ (cos phi1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda1)) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (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 (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)) (taylor 0 lambda2) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -2 (* lambda2 (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (pow (cos phi1) 2)) (taylor 0 lambda2) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda2 (+ (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (* lambda2 (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (pow (cos phi1) 2)) (taylor 0 lambda2) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda2 (+ (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (* lambda2 (+ (* lambda2 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda1)) (sin (neg lambda1)))) (* (cos (neg lambda1)) (sin (neg lambda1)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2))))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (pow (cos phi1) 2)) (taylor 0 lambda2) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) (taylor 0 lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* (cos phi2) (cos (neg lambda1)))) (cos phi1)) (taylor 0 lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1)))) (cos phi1)) (taylor 0 lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi2) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi2) (sin (neg lambda1))))))))) (* (cos phi2) (cos (neg lambda1)))) (cos phi1)) (taylor 0 lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf lambda2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf lambda2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf lambda2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf lambda2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))) (taylor inf lambda2) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))) (taylor inf lambda2) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))) (taylor inf lambda2) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))) (taylor inf lambda2) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (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 (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (taylor inf lambda2) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (taylor inf lambda2) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (taylor inf lambda2) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (taylor inf lambda2) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)) (taylor inf lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)) (taylor inf lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)) (taylor inf lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)) (taylor inf lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))) (taylor -inf lambda2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))) (taylor -inf lambda2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))) (taylor -inf lambda2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))) (taylor -inf lambda2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1))) (taylor -inf lambda2) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1))) (taylor -inf lambda2) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1))) (taylor -inf lambda2) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1))) (taylor -inf lambda2) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1)))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1)))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1)))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1)))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (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 (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (taylor -inf lambda2) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (taylor -inf lambda2) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (taylor -inf lambda2) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (taylor -inf lambda2) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1)) (taylor -inf lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1)) (taylor -inf lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1)) (taylor -inf lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1)) (taylor -inf lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1)))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (pow phi2 2))) (taylor 0 phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2))) (taylor 0 phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2))) (taylor 0 phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 phi2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 phi2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 phi2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 phi2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch (*.f64 (cos.f64 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 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch (*.f64 (cos.f64 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 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch (*.f64 (cos.f64 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 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2)) (- (cos (- lambda2 lambda1)) (cos phi1))) (taylor 0 phi2) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow phi2 2) (- (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (taylor 0 phi2) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow phi2 2) (- (+ (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* (pow phi2 2) (- (* 1/3 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (+ (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* 1/24 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (taylor 0 phi2) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow phi2 2) (- (+ (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* (pow phi2 2) (- (+ (* 1/3 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* (pow phi2 2) (- (* -2/45 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (+ (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (* 1/3 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (+ (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* 1/24 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2)))))) (- (cos (- lambda2 lambda1)) (cos phi1)))) (+ (* -1/720 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))) (* 1/24 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (- (cos (- lambda2 lambda1)) (cos phi1))))))))) (+ (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* 1/24 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (taylor 0 phi2) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2))))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor 0 phi2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* -1/2 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))) (taylor 0 phi2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))) (taylor 0 phi2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2))))))))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (cos phi1)) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (+ (cos phi1) (* -1/2 (* (pow phi2 2) (cos lambda1))))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* 1/24 (* (pow phi2 2) (cos lambda1))))))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda1))) (* 1/24 (cos lambda1)))))))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (- lambda2 lambda1))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi2 2) (cos (- lambda2 lambda1)))))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi2 2) (cos (- lambda2 lambda1)))))))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1))))))))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2)) (taylor 0 phi2) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1 (* (pow phi2 2) (pow (cos (- lambda2 lambda1)) 2))) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (taylor 0 phi2) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow phi2 2) (+ (* -1 (pow (cos (- lambda2 lambda1)) 2)) (* 1/3 (* (pow phi2 2) (pow (cos (- lambda2 lambda1)) 2))))) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (taylor 0 phi2) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow phi2 2) (+ (* -1 (pow (cos (- lambda2 lambda1)) 2)) (* (pow phi2 2) (+ (* -2/45 (* (pow phi2 2) (pow (cos (- lambda2 lambda1)) 2))) (* 1/3 (pow (cos (- lambda2 lambda1)) 2)))))) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (taylor 0 phi2) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos (- lambda2 lambda1)) (cos phi1)) (taylor 0 phi2) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi2 2) (cos (- lambda2 lambda1))))) (cos phi1)) (taylor 0 phi2) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi2 2) (cos (- lambda2 lambda1))))))) (cos phi1)) (taylor 0 phi2) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1)))))))) (cos phi1)) (taylor 0 phi2) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf phi2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf phi2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf phi2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf phi2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))) (taylor inf phi2) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))) (taylor inf phi2) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))) (taylor inf phi2) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))) (taylor inf phi2) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi2) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi2) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi2) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi2) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (taylor inf phi2) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (taylor inf phi2) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (taylor inf phi2) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (taylor inf phi2) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)) (taylor inf phi2) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)) (taylor inf phi2) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)) (taylor inf phi2) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)) (taylor inf phi2) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor -inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor -inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor -inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor -inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi2) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor -inf phi2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor -inf phi2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor -inf phi2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor -inf phi2) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))) (taylor -inf phi2) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))) (taylor -inf phi2) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))) (taylor -inf phi2) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))) (taylor -inf phi2) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (taylor -inf phi2) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (taylor -inf phi2) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (taylor -inf phi2) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (taylor -inf phi2) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)) (taylor -inf phi2) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)) (taylor -inf phi2) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)) (taylor -inf phi2) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)) (taylor -inf phi2) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 phi1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 phi1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 phi1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 phi1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)) (taylor 0 phi1) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow phi1 2) (- (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (taylor 0 phi1) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow phi1 2) (- (+ (* -1 (* (pow phi1 2) (+ (* -1/24 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))) (+ (* 1/3 (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (* 1/2 (/ (- (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2)))) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))))))) (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (taylor 0 phi1) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow phi1 2) (- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* 2/45 (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (+ (* -1/2 (/ (+ (* -1/24 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))) (+ (* 1/3 (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (* 1/2 (/ (- (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2)))) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))))) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (+ (* -1/24 (/ (- (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2)))) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (* 1/720 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))))))) (+ (* -1/24 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))) (+ (* 1/3 (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (* 1/2 (/ (- (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2)))) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))))))) (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (taylor 0 phi1) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos lambda1) (cos phi2))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos lambda1) (cos phi2)))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda2 lambda1))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda2 lambda1))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (cos (- lambda1 lambda2))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (cos (- lambda1 lambda2)) (* -1/2 (pow phi1 2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (taylor 0 phi1) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow phi1 2)) 1) (taylor 0 phi1) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2)))) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) 1) (taylor 0 phi1) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3)))) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) 1) (taylor 0 phi1) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) (taylor 0 phi1) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda2 lambda1)))) 1) (taylor 0 phi1) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi2) (cos (- lambda2 lambda1))) (* (pow phi1 2) (+ 1/2 (* -1/24 (pow phi1 2))))) 1) (taylor 0 phi1) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi2) (cos (- lambda2 lambda1))) (* (pow phi1 2) (+ 1/2 (* (pow phi1 2) (- (* 1/720 (pow phi1 2)) 1/24))))) 1) (taylor 0 phi1) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf phi1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf phi1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf phi1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf phi1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))) (taylor inf phi1) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))) (taylor inf phi1) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))) (taylor inf phi1) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))) (taylor inf phi1) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi1) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi1) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi1) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi1) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (- lambda1 lambda2))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (- lambda1 lambda2))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (- lambda1 lambda2))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (- lambda1 lambda2))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (taylor inf phi1) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (taylor inf phi1) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (taylor inf phi1) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (taylor inf phi1) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)) (taylor inf phi1) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)) (taylor inf phi1) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)) (taylor inf phi1) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)) (taylor inf phi1) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor -inf phi1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor -inf phi1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor -inf phi1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor -inf phi1) (#s(alt #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (patch #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))) (taylor -inf phi1) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))) (taylor -inf phi1) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))) (taylor -inf phi1) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))) (taylor -inf phi1) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (- lambda1 lambda2))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (- lambda1 lambda2))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (- lambda1 lambda2))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (- lambda1 lambda2))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (taylor -inf phi1) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (taylor -inf phi1) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (taylor -inf phi1) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (taylor -inf phi1) (#s(alt (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)) (taylor -inf phi1) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)) (taylor -inf phi1) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)) (taylor -inf phi1) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)) (taylor -inf phi1) (#s(alt (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
Calls

12 calls:

TimeVariablePointExpression
28.0ms
lambda1
@inf
((+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (cos phi2) (/ 1 (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1))) (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow (* lambda1 lambda1) -1/2) (* lambda1 lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))) (cos phi2)) (cos phi1)) (* (cos lambda2) (sin lambda1)) (sin (- lambda1 lambda2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (cos (- lambda1 lambda2)) (+ (cos (- lambda1 lambda2)) (cos phi1)) (cos (- lambda2 lambda1)) (sin (- lambda1 lambda2)) (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)))
18.0ms
phi2
@inf
((+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (cos phi2) (/ 1 (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1))) (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow (* lambda1 lambda1) -1/2) (* lambda1 lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))) (cos phi2)) (cos phi1)) (* (cos lambda2) (sin lambda1)) (sin (- lambda1 lambda2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (cos (- lambda1 lambda2)) (+ (cos (- lambda1 lambda2)) (cos phi1)) (cos (- lambda2 lambda1)) (sin (- lambda1 lambda2)) (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)))
8.0ms
phi1
@inf
((+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (cos phi2) (/ 1 (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1))) (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow (* lambda1 lambda1) -1/2) (* lambda1 lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))) (cos phi2)) (cos phi1)) (* (cos lambda2) (sin lambda1)) (sin (- lambda1 lambda2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (cos (- lambda1 lambda2)) (+ (cos (- lambda1 lambda2)) (cos phi1)) (cos (- lambda2 lambda1)) (sin (- lambda1 lambda2)) (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)))
6.0ms
phi2
@-inf
((+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (cos phi2) (/ 1 (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1))) (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow (* lambda1 lambda1) -1/2) (* lambda1 lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))) (cos phi2)) (cos phi1)) (* (cos lambda2) (sin lambda1)) (sin (- lambda1 lambda2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (cos (- lambda1 lambda2)) (+ (cos (- lambda1 lambda2)) (cos phi1)) (cos (- lambda2 lambda1)) (sin (- lambda1 lambda2)) (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)))
6.0ms
lambda1
@-inf
((+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (cos phi2) (/ 1 (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1))) (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow (* lambda1 lambda1) -1/2) (* lambda1 lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))) (cos phi2)) (cos phi1)) (* (cos lambda2) (sin lambda1)) (sin (- lambda1 lambda2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (cos (- lambda1 lambda2)) (+ (cos (- lambda1 lambda2)) (cos phi1)) (cos (- lambda2 lambda1)) (sin (- lambda1 lambda2)) (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)))

simplify339.0ms (1.8%)

Memory
-0.7MiB live, 307.3MiB allocated
Algorithm
egg-herbie
Rules
14 638×lower-fma.f64
14 638×lower-fma.f32
7 566×lower-*.f64
7 566×lower-*.f32
4 722×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
096624286
1301823757
0880022696
Stop Event
iter limit
node limit
Counts
1 104 → 1 094
Calls
Call 1
Inputs
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* -1 (* (cos phi2) (sin lambda2)))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/ 1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ (* -1 (/ lambda1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2))) (/ 1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(+ (* lambda1 (- (/ lambda1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 3)) (/ 1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2)))) (/ 1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(+ (* lambda1 (- (* lambda1 (+ (* -1 (/ lambda1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 4))) (/ 1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 3)))) (/ 1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2)))) (/ 1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 lambda1)
(/ 1 lambda1)
(/ 1 lambda1)
(/ 1 lambda1)
(pow lambda1 2)
(pow lambda1 2)
(pow lambda1 2)
(pow lambda1 2)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (neg lambda2)))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (- (* (cos lambda2) (cos phi2)) (cos phi1)))
(- (+ (* lambda1 (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2)))) (/ (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1))))
(- (+ (* lambda1 (- (+ (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (* lambda1 (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))) (- (* (cos lambda2) (cos phi2)) (cos phi1))) (+ (* -1/2 (/ (* (cos lambda2) (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))) (/ (* (cos phi2) (* (sin lambda2) (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))))) (- (* (cos lambda2) (cos phi2)) (cos phi1))))))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2)))) (/ (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1))))
(- (+ (* lambda1 (- (+ (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (* lambda1 (- (+ (* lambda1 (- (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda2) (sin lambda2))) (* -1/3 (* (cos lambda2) (sin lambda2))))) (- (* (cos lambda2) (cos phi2)) (cos phi1))) (+ (* -1/2 (/ (* (cos lambda2) (* (cos phi2) (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (+ (* -1/6 (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))) (/ (* (cos phi2) (* (sin lambda2) (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))) (- (* (cos lambda2) (cos phi2)) (cos phi1))) (+ (* -1/2 (/ (* (cos lambda2) (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))) (/ (* (cos phi2) (* (sin lambda2) (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))))) (- (* (cos lambda2) (cos phi2)) (cos phi1))))))) (- (* (cos lambda2) (cos phi2)) (cos phi1))))))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (+ (* -1/2 (/ (* (cos lambda2) (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))) (/ (* (cos phi2) (* (sin lambda2) (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))))) (- (* (cos lambda2) (cos phi2)) (cos phi1))))))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2)))) (/ (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(* (cos phi2) (sin (neg lambda2)))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(+ (cos phi1) (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))
(+ (cos phi1) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))
(* lambda1 (cos lambda2))
(* lambda1 (+ (cos lambda2) (* -1/6 (* (pow lambda1 2) (cos lambda2)))))
(* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* 1/120 (* (pow lambda1 2) (cos lambda2)))))))
(* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (cos lambda2))) (* 1/120 (cos lambda2))))))))
(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 phi1) (* (cos phi2) (cos (neg lambda2))))
(+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))))
(+ (cos phi1) (cos phi2))
(+ (cos phi1) (+ (cos phi2) (* -1/2 (* (pow lambda1 2) (cos phi2)))))
(+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda1 2) (cos phi2)))))))
(+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (cos phi2))) (* 1/24 (cos phi2))))))))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(+ (cos phi1) (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))
(+ (cos phi1) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))
(cos (neg lambda2))
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(+ (cos phi1) (cos (neg lambda2)))
(+ (cos phi1) (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))))
(+ (cos phi1) (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))))
(+ (cos phi1) (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))))
(cos lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(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)))))))))
(- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2))
(- (+ (* 2 (* lambda1 (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))))) (* (pow (cos lambda2) 2) (pow (cos phi2) 2))) (pow (cos phi1) 2))
(- (+ (* lambda1 (+ (* 2 (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2)))) (* lambda1 (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))))) (* (pow (cos lambda2) 2) (pow (cos phi2) 2))) (pow (cos phi1) 2))
(- (+ (* lambda1 (+ (* 2 (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2)))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda2) (sin lambda2))) (* -1/3 (* (cos lambda2) (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))))))) (* (pow (cos lambda2) 2) (pow (cos phi2) 2))) (pow (cos phi1) 2))
(- (* (cos lambda2) (cos phi2)) (cos phi1))
(- (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))) (cos phi1))
(- (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))) (cos phi1))
(- (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))) (cos phi1))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)))
(/ 1 lambda1)
(/ (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1))) lambda1)
(/ (- (+ 1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2) (pow lambda1 2))) (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)) lambda1)
(/ (- (+ 1 (* -1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 3) (pow lambda1 3)))) (+ (* -1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2) (pow lambda1 2))) (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1))) lambda1)
(/ 1 lambda1)
(/ 1 lambda1)
(/ 1 lambda1)
(/ 1 lambda1)
(pow lambda1 2)
(pow lambda1 2)
(pow lambda1 2)
(pow lambda1 2)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) lambda1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1)))
(/ 1 lambda1)
(* -1 (/ (- (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1) 1) lambda1))
(* -1 (/ (- (* -1 (/ (- (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) 2) lambda1) (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))) lambda1)) 1) lambda1))
(* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) 3) lambda1) (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) 2)) lambda1)) (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))) lambda1)) 1) lambda1))
(/ -1 lambda1)
(/ -1 lambda1)
(/ -1 lambda1)
(/ -1 lambda1)
(pow lambda1 2)
(pow lambda1 2)
(pow lambda1 2)
(pow lambda1 2)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))
(/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1)))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1)))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1)))) lambda1)) 1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(+ (cos phi1) (* (cos phi2) (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 phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(+ (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(+ (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(+ (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2))
(- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1))
(- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1))
(- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1))
(- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* (cos phi2) (sin lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))
(- (+ (* lambda2 (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1))))
(- (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* lambda2 (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2)))))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1))))
(- (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* lambda2 (- (+ (* lambda2 (- (/ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda1)) (sin (neg lambda1)))) (* (cos (neg lambda1)) (sin (neg lambda1))))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2)))))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (+ (* -1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2)))))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* 1/6 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2)))))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(* (cos phi2) (sin lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(sin lambda1)
(+ (sin lambda1) (* -1/2 (* (pow lambda2 2) (sin lambda1))))
(+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* 1/24 (* (pow lambda2 2) (sin lambda1))))))
(+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (sin lambda1))) (* 1/24 (sin lambda1)))))))
(sin lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (* (cos phi2) (cos (neg lambda1))))
(+ (cos phi1) (+ (* -1 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* (cos phi2) (cos (neg lambda1)))))
(+ (cos phi1) (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1)))))
(+ (cos phi1) (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi2) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi2) (sin (neg lambda1))))))))) (* (cos phi2) (cos (neg lambda1)))))
(cos 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 phi1))
(+ (cos lambda1) (+ (cos phi1) (* lambda2 (sin lambda1))))
(+ (cos lambda1) (+ (cos phi1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))))
(+ (cos lambda1) (+ (cos phi1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1))))))
(cos (neg lambda1))
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(sin lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2))
(- (+ (* -2 (* lambda2 (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (pow (cos phi1) 2))
(- (+ (* lambda2 (+ (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (* lambda2 (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (pow (cos phi1) 2))
(- (+ (* lambda2 (+ (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (* lambda2 (+ (* lambda2 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda1)) (sin (neg lambda1)))) (* (cos (neg lambda1)) (sin (neg lambda1)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2))))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (pow (cos phi1) 2))
(- (* (cos phi2) (cos (neg lambda1))) (cos phi1))
(- (+ (* -1 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* (cos phi2) (cos (neg lambda1)))) (cos phi1))
(- (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1)))) (cos phi1))
(- (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi2) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi2) (sin (neg lambda1))))))))) (* (cos phi2) (cos (neg lambda1)))) (cos phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1)))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(+ (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(+ (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(+ (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(+ (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(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)))
(- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2))
(- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1))
(- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1))
(- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1))
(- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))))
1
(+ 1 (* -1/2 (pow phi2 2)))
(+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))
(+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(sin (- lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2)) (- (cos (- lambda2 lambda1)) (cos phi1)))
(- (+ (* (pow phi2 2) (- (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (cos (- lambda2 lambda1)) (cos phi1))))
(- (+ (* (pow phi2 2) (- (+ (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* (pow phi2 2) (- (* 1/3 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (+ (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* 1/24 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (cos (- lambda2 lambda1)) (cos phi1))))
(- (+ (* (pow phi2 2) (- (+ (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* (pow phi2 2) (- (+ (* 1/3 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* (pow phi2 2) (- (* -2/45 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (+ (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (* 1/3 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (+ (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* 1/24 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2)))))) (- (cos (- lambda2 lambda1)) (cos phi1)))) (+ (* -1/720 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))) (* 1/24 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (- (cos (- lambda2 lambda1)) (cos phi1))))))))) (+ (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* 1/24 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (cos (- lambda2 lambda1)) (cos phi1))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos 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 phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (cos phi1) (+ (* -1/2 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))
(+ (cos lambda1) (cos phi1))
(+ (cos lambda1) (+ (cos phi1) (* -1/2 (* (pow phi2 2) (cos lambda1)))))
(+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* 1/24 (* (pow phi2 2) (cos lambda1)))))))
(+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda1))) (* 1/24 (cos lambda1))))))))
(+ (cos phi1) (cos (- lambda2 lambda1)))
(+ (cos phi1) (+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi2 2) (cos (- lambda2 lambda1))))))
(+ (cos phi1) (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi2 2) (cos (- lambda2 lambda1))))))))
(+ (cos phi1) (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1)))))))))
(- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))
(- (+ (* -1 (* (pow phi2 2) (pow (cos (- lambda2 lambda1)) 2))) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(- (+ (* (pow phi2 2) (+ (* -1 (pow (cos (- lambda2 lambda1)) 2)) (* 1/3 (* (pow phi2 2) (pow (cos (- lambda2 lambda1)) 2))))) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(- (+ (* (pow phi2 2) (+ (* -1 (pow (cos (- lambda2 lambda1)) 2)) (* (pow phi2 2) (+ (* -2/45 (* (pow phi2 2) (pow (cos (- lambda2 lambda1)) 2))) (* 1/3 (pow (cos (- lambda2 lambda1)) 2)))))) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(- (cos (- lambda2 lambda1)) (cos phi1))
(- (+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi2 2) (cos (- lambda2 lambda1))))) (cos phi1))
(- (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi2 2) (cos (- lambda2 lambda1))))))) (cos phi1))
(- (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1)))))))) (cos phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(cos phi2)
(cos phi2)
(cos phi2)
(cos phi2)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(cos phi2)
(cos phi2)
(cos phi2)
(cos phi2)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))
(- (+ (* (pow phi1 2) (- (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)))
(- (+ (* (pow phi1 2) (- (+ (* -1 (* (pow phi1 2) (+ (* -1/24 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))) (+ (* 1/3 (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (* 1/2 (/ (- (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2)))) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))))))) (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)))
(- (+ (* (pow phi1 2) (- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* 2/45 (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (+ (* -1/2 (/ (+ (* -1/24 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))) (+ (* 1/3 (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (* 1/2 (/ (- (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2)))) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))))) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (+ (* -1/24 (/ (- (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2)))) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (* 1/720 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))))))) (+ (* -1/24 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))) (+ (* 1/3 (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (* 1/2 (/ (- (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2)))) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))))))) (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(+ 1 (* (cos lambda1) (cos phi2)))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos lambda1) (cos phi2))))
(+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda2 lambda1)))))
(+ 1 (+ (* (cos phi2) (cos (- lambda2 lambda1))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(+ 1 (+ (* (cos phi2) (cos (- lambda2 lambda1))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(+ 1 (cos (- lambda1 lambda2)))
(+ 1 (+ (cos (- lambda1 lambda2)) (* -1/2 (pow phi1 2))))
(+ 1 (+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(+ 1 (+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1)
(- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow phi1 2)) 1)
(- (+ (* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2)))) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) 1)
(- (+ (* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3)))) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) 1)
(- (* (cos phi2) (cos (- lambda2 lambda1))) 1)
(- (+ (* 1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda2 lambda1)))) 1)
(- (+ (* (cos phi2) (cos (- lambda2 lambda1))) (* (pow phi1 2) (+ 1/2 (* -1/24 (pow phi1 2))))) 1)
(- (+ (* (cos phi2) (cos (- lambda2 lambda1))) (* (pow phi1 2) (+ 1/2 (* (pow phi1 2) (- (* 1/720 (pow phi1 2)) 1/24))))) 1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
Outputs
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(* -1 (* (cos phi2) (sin lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))
(*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))
(fma.f64 (*.f64 lambda1 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))))
(fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2))) lambda1) lambda1 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(/ 1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(/.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))
(+ (* -1 (/ lambda1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2))) (/ 1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(-.f64 (/.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))) (/.f64 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))))
(+ (* lambda1 (- (/ lambda1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 3)) (/ 1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2)))) (/ 1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(fma.f64 (-.f64 (/.f64 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) lambda1 (/.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))))
(+ (* lambda1 (- (* lambda1 (+ (* -1 (/ lambda1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 4))) (/ 1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 3)))) (/ 1 (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2)))) (/ 1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(fma.f64 (fma.f64 (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))) (/.f64 lambda1 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 4 binary64)))) lambda1 (/.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) lambda1 (/.f64 #s(literal 1 binary64) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))))
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
(pow lambda1 2)
(*.f64 lambda1 lambda1)
(pow lambda1 2)
(*.f64 lambda1 lambda1)
(pow lambda1 2)
(*.f64 lambda1 lambda1)
(pow lambda1 2)
(*.f64 lambda1 lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (neg lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (*.f64 lambda1 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2))) lambda1) lambda1 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(/ (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (- (* (cos lambda2) (cos phi2)) (cos phi1)))
(/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))
(- (+ (* lambda1 (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2)))) (/ (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1))))
(fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 lambda2)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (*.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (sin.f64 lambda2)) (cos.f64 phi2)) (pow.f64 (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)))) lambda1 (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))
(- (+ (* lambda1 (- (+ (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (* lambda1 (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))) (- (* (cos lambda2) (cos phi2)) (cos phi1))) (+ (* -1/2 (/ (* (cos lambda2) (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))) (/ (* (cos phi2) (* (sin lambda2) (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))))) (- (* (cos lambda2) (cos phi2)) (cos phi1))))))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2)))) (/ (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1))))
(fma.f64 (fma.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (cos.f64 phi2)) (cos.f64 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 lambda2)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (*.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (sin.f64 lambda2)) (cos.f64 phi2)) (pow.f64 (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)))) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1 (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 lambda2)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (*.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (sin.f64 lambda2)) (cos.f64 phi2)) (pow.f64 (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))))) lambda1 (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))
(- (+ (* lambda1 (- (+ (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (* lambda1 (- (+ (* lambda1 (- (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda2) (sin lambda2))) (* -1/3 (* (cos lambda2) (sin lambda2))))) (- (* (cos lambda2) (cos phi2)) (cos phi1))) (+ (* -1/2 (/ (* (cos lambda2) (* (cos phi2) (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (+ (* -1/6 (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))) (/ (* (cos phi2) (* (sin lambda2) (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))) (- (* (cos lambda2) (cos phi2)) (cos phi1))) (+ (* -1/2 (/ (* (cos lambda2) (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))) (/ (* (cos phi2) (* (sin lambda2) (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))))) (- (* (cos lambda2) (cos phi2)) (cos phi1))))))) (- (* (cos lambda2) (cos phi2)) (cos phi1))))))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (+ (* -1/2 (/ (* (cos lambda2) (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))) (/ (* (cos phi2) (* (sin lambda2) (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))))) (- (* (cos lambda2) (cos phi2)) (cos phi1))))))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2)))) (/ (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1))))
(fma.f64 (fma.f64 (fma.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (/.f64 (*.f64 (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) #s(literal -4/3 binary64))) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 lambda2)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (*.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (sin.f64 lambda2)) (cos.f64 phi2)) (pow.f64 (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))) (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi2)) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (sin.f64 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (cos.f64 phi2)) (cos.f64 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 lambda2)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (*.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (sin.f64 lambda2)) (cos.f64 phi2)) (pow.f64 (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)))) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))) lambda1 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (cos.f64 phi2)) (cos.f64 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 lambda2)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (*.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (sin.f64 lambda2)) (cos.f64 phi2)) (pow.f64 (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)))) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))) lambda1 (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 lambda2)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (*.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (sin.f64 lambda2)) (cos.f64 phi2)) (pow.f64 (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))))) lambda1 (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(* (cos phi2) (sin (neg lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (*.f64 lambda1 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2))) lambda1) lambda1 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (sin.f64 lambda2) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (cos.f64 phi2))) lambda1 (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(* lambda1 (cos lambda2))
(*.f64 (cos.f64 lambda2) lambda1)
(* lambda1 (+ (cos lambda2) (* -1/6 (* (pow lambda1 2) (cos lambda2)))))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 lambda2)) lambda1)
(* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* 1/120 (* (pow lambda1 2) (cos lambda2)))))))
(fma.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (*.f64 (cos.f64 lambda2) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda1 lambda1) #s(literal -1/6 binary64))) (*.f64 (cos.f64 lambda2) lambda1))
(* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (cos lambda2))) (* 1/120 (cos lambda2))))))))
(fma.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 lambda2) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda1 lambda1) #s(literal 1/120 binary64))) (*.f64 lambda1 lambda1) (*.f64 #s(literal -1/6 binary64) (cos.f64 lambda2))) (*.f64 (cos.f64 lambda2) lambda1))
(sin (neg lambda2))
(neg.f64 (sin.f64 lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 lambda2)) lambda1 (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (neg.f64 (sin.f64 lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (cos.f64 phi2))) lambda1 (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (cos phi2))
(+.f64 (cos.f64 phi1) (cos.f64 phi2))
(+ (cos phi1) (+ (cos phi2) (* -1/2 (* (pow lambda1 2) (cos phi2)))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda1 2) (cos phi2)))))))
(fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 #s(literal 1/24 binary64) (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (*.f64 lambda1 lambda1) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (cos phi2))) (* 1/24 (cos phi2))))))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/720 binary64) (*.f64 lambda1 lambda1) #s(literal 1/24 binary64))) (*.f64 lambda1 lambda1) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (*.f64 lambda1 lambda1) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (sin.f64 lambda2) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (cos.f64 phi2))) lambda1 (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(cos (neg lambda2))
(cos.f64 lambda2)
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos phi1) (cos (neg lambda2)))
(+.f64 (cos.f64 phi1) (cos.f64 lambda2))
(+ (cos phi1) (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))))
(+.f64 (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))))
(+.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))))
(+.f64 (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.f64 phi1))
(cos lambda2)
(cos.f64 lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (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 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 lambda2)) lambda1 (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2))
(-.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(- (+ (* 2 (* lambda1 (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))))) (* (pow (cos lambda2) 2) (pow (cos phi2) 2))) (pow (cos phi1) 2))
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 lambda2) lambda1)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2)) (-.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (+ (* lambda1 (+ (* 2 (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2)))) (* lambda1 (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))))) (* (pow (cos lambda2) 2) (pow (cos phi2) 2))) (pow (cos phi1) 2))
(fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (cos.f64 lambda2)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2)) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (-.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))))) lambda1 (-.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (+ (* lambda1 (+ (* 2 (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2)))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda2) (sin lambda2))) (* -1/3 (* (cos lambda2) (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))))))) (* (pow (cos lambda2) 2) (pow (cos phi2) 2))) (pow (cos phi1) 2))
(fma.f64 (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 lambda2)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (sin.f64 lambda2) (*.f64 (fma.f64 (*.f64 lambda1 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) #s(literal -4/3 binary64))) (*.f64 (-.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) lambda1)) lambda1 (-.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (cos lambda2) (cos phi2)) (cos phi1))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))
(- (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))) (cos phi1))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))
(- (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))) (cos phi1))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))
(- (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))) (cos phi1))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (sin.f64 lambda2) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (cos.f64 phi2))) lambda1 (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
(/ (+ 1 (* -1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1))) lambda1)
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) lambda1)
(/ (- (+ 1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2) (pow lambda1 2))) (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)) lambda1)
(/.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) lambda1)
(/ (- (+ 1 (* -1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 3) (pow lambda1 3)))) (+ (* -1 (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) 2) (pow lambda1 2))) (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1))) lambda1)
(/.f64 (-.f64 (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))) (-.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))) lambda1)
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
(pow lambda1 2)
(*.f64 lambda1 lambda1)
(pow lambda1 2)
(*.f64 lambda1 lambda1)
(pow lambda1 2)
(*.f64 lambda1 lambda1)
(pow lambda1 2)
(*.f64 lambda1 lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(/ 1 lambda1)
(/.f64 #s(literal 1 binary64) lambda1)
(* -1 (/ (- (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1) 1) lambda1))
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) lambda1)
(* -1 (/ (- (* -1 (/ (- (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) 2) lambda1) (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))) lambda1)) 1) lambda1))
(/.f64 (fma.f64 (/.f64 (-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) lambda1) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))) (neg.f64 lambda1)) #s(literal -1 binary64) #s(literal 1 binary64)) lambda1)
(* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) 3) lambda1) (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) 2)) lambda1)) (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))) lambda1)) 1) lambda1))
(/.f64 (fma.f64 (/.f64 (-.f64 (/.f64 (-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))) (neg.f64 lambda1)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))) (neg.f64 lambda1)) #s(literal -1 binary64) #s(literal 1 binary64)) lambda1)
(/ -1 lambda1)
(/.f64 #s(literal -1 binary64) lambda1)
(/ -1 lambda1)
(/.f64 #s(literal -1 binary64) lambda1)
(/ -1 lambda1)
(/.f64 #s(literal -1 binary64) lambda1)
(/ -1 lambda1)
(/.f64 #s(literal -1 binary64) lambda1)
(pow lambda1 2)
(*.f64 lambda1 lambda1)
(pow lambda1 2)
(*.f64 lambda1 lambda1)
(pow lambda1 2)
(*.f64 lambda1 lambda1)
(pow lambda1 2)
(*.f64 lambda1 lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1)))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1)))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1)))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (neg.f64 lambda1)) lambda1)
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(+ (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(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))
(- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (*.f64 #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 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)) (cos.f64 phi2))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (*.f64 #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 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)) (cos.f64 phi2))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))
(/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)))
(- (+ (* lambda2 (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1))))
(fma.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (/.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda1)) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (-.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (cos.f64 phi2)) (pow.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)))) lambda2 (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))))
(- (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* lambda2 (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2)))))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1))))
(fma.f64 (fma.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (/.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda1) (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)))) (fma.f64 (/.f64 (*.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (cos.f64 lambda1)) (cos.f64 phi2)) (pow.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))) #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (fma.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (/.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda1)) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (-.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (cos.f64 phi2)) (pow.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))))) lambda2 (fma.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (/.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda1)) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (-.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (cos.f64 phi2)) (pow.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))))) lambda2 (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))))
(- (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* lambda2 (- (+ (* lambda2 (- (/ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda1)) (sin (neg lambda1)))) (* (cos (neg lambda1)) (sin (neg lambda1))))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2)))))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (+ (* -1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2)))))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* 1/6 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2)))))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1))))
(fma.f64 (fma.f64 (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal 4/3 binary64)) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) (fma.f64 (*.f64 #s(literal 1/6 binary64) (cos.f64 phi2)) (/.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (-.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (/.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda1)) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (-.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (cos.f64 phi2)) (pow.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (-.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (/.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda1) (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)))) (fma.f64 (/.f64 (*.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (cos.f64 lambda1)) (cos.f64 phi2)) (pow.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))) #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (fma.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (/.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda1)) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (-.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (cos.f64 phi2)) (pow.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)))))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)))))) lambda2 (-.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (/.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda1) (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)))) (fma.f64 (/.f64 (*.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (cos.f64 lambda1)) (cos.f64 phi2)) (pow.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))) #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (fma.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (/.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda1)) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (-.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (cos.f64 phi2)) (pow.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)))))) lambda2 (fma.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (/.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda1)) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (-.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (cos.f64 phi2)) (pow.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))))) lambda2 (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(* (cos phi2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (*.f64 #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 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)) (cos.f64 phi2))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (sin.f64 lambda1) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (cos.f64 phi2))) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi2))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1/2 (* (pow lambda2 2) (sin lambda1))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) lambda2 #s(literal 1 binary64)) (sin.f64 lambda1))
(+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* 1/24 (* (pow lambda2 2) (sin lambda1))))))
(fma.f64 (*.f64 (sin.f64 lambda1) (fma.f64 #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 #s(literal -1/2 binary64) (sin.f64 lambda1))) (*.f64 lambda2 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) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(fma.f64 (fma.f64 (*.f64 lambda2 #s(literal -1/2 binary64)) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 lambda2 (cos.f64 lambda1)) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (sin.f64 lambda1) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (cos.f64 phi2))) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi2))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (* (cos phi2) (cos (neg lambda1))))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* -1 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* (cos phi2) (cos (neg lambda1)))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (sin.f64 lambda1) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1)))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi2) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi2) (sin (neg lambda1))))))))) (* (cos phi2) (cos (neg lambda1)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 lambda2 (cos.f64 phi2))) (neg.f64 (sin.f64 lambda1)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi2))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(cos lambda1)
(cos.f64 lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (*.f64 lambda2 (cos.f64 lambda1)) #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 phi1))
(+.f64 (cos.f64 phi1) (cos.f64 lambda1))
(+ (cos lambda1) (+ (cos phi1) (* lambda2 (sin lambda1))))
(fma.f64 (sin.f64 lambda1) lambda2 (+.f64 (cos.f64 phi1) (cos.f64 lambda1)))
(+ (cos lambda1) (+ (cos phi1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))))
(fma.f64 (fma.f64 (*.f64 lambda2 (cos.f64 lambda1)) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (+.f64 (cos.f64 phi1) (cos.f64 lambda1)))
(+ (cos lambda1) (+ (cos phi1) (* 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 (+.f64 (cos.f64 phi1) (cos.f64 lambda1)))
(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 lambda2 (cos.f64 lambda1)) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (neg.f64 (sin.f64 lambda1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(fma.f64 (fma.f64 (*.f64 lambda2 #s(literal -1/2 binary64)) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 lambda2 (cos.f64 lambda1)) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2))
(-.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(- (+ (* -2 (* lambda2 (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (pow (cos phi1) 2))
(fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 lambda2 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda1)) (-.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (+ (* lambda2 (+ (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (* lambda2 (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (pow (cos phi1) 2))
(fma.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda1)) (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda1) (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))))) lambda2 (-.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (+ (* lambda2 (+ (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (* lambda2 (+ (* lambda2 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda1)) (sin (neg lambda1)))) (* (cos (neg lambda1)) (sin (neg lambda1)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2))))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (pow (cos phi1) 2))
(fma.f64 (fma.f64 (*.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (neg.f64 (sin.f64 lambda1))) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) #s(literal 4/3 binary64)) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda1)) (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda1) (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) lambda2)) lambda2 (-.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (cos phi2) (cos (neg lambda1))) (cos phi1))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))
(- (+ (* -1 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* (cos phi2) (cos (neg lambda1)))) (cos phi1))
(fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (sin.f64 lambda1) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)))
(- (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1)))) (cos phi1))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)))
(- (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi2) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi2) (sin (neg lambda1))))))))) (* (cos phi2) (cos (neg lambda1)))) (cos phi1))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 lambda2 (cos.f64 phi2))) (neg.f64 (sin.f64 lambda1)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi2))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(+ (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1))))
(fma.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))
(fma.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))))
(fma.f64 (fma.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 #s(literal -1/2 binary64) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (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
#s(literal 1 binary64)
(+ 1 (* -1/2 (pow phi2 2)))
(fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))
(+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))
(+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))
(fma.f64 (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(/ (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2)) (- (cos (- lambda2 lambda1)) (cos phi1)))
(/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(- (+ (* (pow phi2 2) (- (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (cos (- lambda2 lambda1)) (cos phi1))))
(fma.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (neg.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #s(literal 2 binary64))))) (*.f64 phi2 phi2) (/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
(- (+ (* (pow phi2 2) (- (+ (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* (pow phi2 2) (- (* 1/3 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (+ (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* 1/24 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (cos (- lambda2 lambda1)) (cos phi1))))
(fma.f64 (fma.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 1/3 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (neg.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #s(literal 2 binary64))))) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (*.f64 (*.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #s(literal 2 binary64)))))) (*.f64 phi2 phi2) (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (neg.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #s(literal 2 binary64)))))) (*.f64 phi2 phi2) (/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
(- (+ (* (pow phi2 2) (- (+ (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* (pow phi2 2) (- (+ (* 1/3 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* (pow phi2 2) (- (* -2/45 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (+ (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (* 1/3 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (+ (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* 1/24 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2)))))) (- (cos (- lambda2 lambda1)) (cos phi1)))) (+ (* -1/720 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))) (* 1/24 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (- (cos (- lambda2 lambda1)) (cos phi1))))))))) (+ (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* 1/24 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (cos (- lambda2 lambda1)) (cos phi1))))
(fma.f64 (fma.f64 (fma.f64 (-.f64 (*.f64 #s(literal -2/45 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 1/3 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (neg.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #s(literal 2 binary64))))) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (*.f64 (*.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #s(literal 2 binary64)))))) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (fma.f64 (*.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (neg.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #s(literal 2 binary64))))) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (*.f64 (*.f64 #s(literal -1/720 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #s(literal 2 binary64))))))) (*.f64 phi2 phi2) (-.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 1/3 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (neg.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #s(literal 2 binary64))))) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (*.f64 (*.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #s(literal 2 binary64))))))) (*.f64 phi2 phi2) (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (neg.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #s(literal 2 binary64)))))) (*.f64 phi2 phi2) (/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1)))
(+ (cos phi1) (+ (* -1/2 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(+.f64 (fma.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (cos.f64 phi1))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))))
(+.f64 (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (*.f64 phi2 phi2)) (*.f64 phi2 phi2))) (cos.f64 phi1))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi2 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(+ (cos lambda1) (cos phi1))
(+.f64 (cos.f64 phi1) (cos.f64 lambda1))
(+ (cos lambda1) (+ (cos phi1) (* -1/2 (* (pow phi2 2) (cos lambda1)))))
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) phi2) phi2 (+.f64 (cos.f64 phi1) (cos.f64 lambda1)))
(+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* 1/24 (* (pow phi2 2) (cos lambda1)))))))
(fma.f64 (*.f64 (cos.f64 lambda1) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (+.f64 (cos.f64 phi1) (cos.f64 lambda1)))
(+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda1))) (* 1/24 (cos lambda1))))))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) (*.f64 phi2 phi2) (+.f64 (cos.f64 phi1) (cos.f64 lambda1)))
(+ (cos phi1) (cos (- lambda2 lambda1)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi2 2) (cos (- lambda2 lambda1))))))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi2 2) (cos (- lambda2 lambda1))))))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(+ (cos phi1) (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1)))))))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi2 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))
(-.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(- (+ (* -1 (* (pow phi2 2) (pow (cos (- lambda2 lambda1)) 2))) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(fma.f64 (fma.f64 #s(literal -1 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (+ (* (pow phi2 2) (+ (* -1 (pow (cos (- lambda2 lambda1)) 2)) (* 1/3 (* (pow phi2 2) (pow (cos (- lambda2 lambda1)) 2))))) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(fma.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (*.f64 phi2 phi2) #s(literal -1 binary64))) (*.f64 phi2 phi2) (-.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (+ (* (pow phi2 2) (+ (* -1 (pow (cos (- lambda2 lambda1)) 2)) (* (pow phi2 2) (+ (* -2/45 (* (pow phi2 2) (pow (cos (- lambda2 lambda1)) 2))) (* 1/3 (pow (cos (- lambda2 lambda1)) 2)))))) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(fma.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal -2/45 binary64) (*.f64 phi2 phi2) #s(literal 1/3 binary64))) (*.f64 phi2 phi2) (neg.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (*.f64 phi2 phi2) (-.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (cos (- lambda2 lambda1)) (cos phi1))
(-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(- (+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi2 2) (cos (- lambda2 lambda1))))) (cos phi1))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (neg.f64 (cos.f64 phi1)))
(- (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi2 2) (cos (- lambda2 lambda1))))))) (cos phi1))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(- (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1)))))))) (cos phi1))
(fma.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi2 phi2) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64)))
(- (+ (* (pow phi1 2) (- (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)))
(fma.f64 (-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64))) (*.f64 (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 phi1 phi1) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64))))
(- (+ (* (pow phi1 2) (- (+ (* -1 (* (pow phi1 2) (+ (* -1/24 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))) (+ (* 1/3 (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (* 1/2 (/ (- (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2)))) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))))))) (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)))
(fma.f64 (fma.f64 (neg.f64 (*.f64 phi1 phi1)) (fma.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64)) #s(literal 2 binary64))) (fma.f64 (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64))) (*.f64 (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64))) #s(literal 1/2 binary64) (/.f64 #s(literal 1/3 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64))))) (-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64))) (*.f64 (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 phi1 phi1) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64))))
(- (+ (* (pow phi1 2) (- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* 2/45 (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (+ (* -1/2 (/ (+ (* -1/24 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))) (+ (* 1/3 (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (* 1/2 (/ (- (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2)))) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))))) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (+ (* -1/24 (/ (- (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2)))) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (* 1/720 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))))))) (+ (* -1/24 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))) (+ (* 1/3 (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (* 1/2 (/ (- (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2)))) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))))))) (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)))
(fma.f64 (fma.f64 (fma.f64 (-.f64 (/.f64 #s(literal 2/45 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64))) (fma.f64 (/.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64)) #s(literal 2 binary64))) (fma.f64 (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64))) (*.f64 (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64))) #s(literal 1/2 binary64) (/.f64 #s(literal 1/3 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64))) (*.f64 (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64))) #s(literal -1/24 binary64) (*.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64)) #s(literal 2 binary64))))))) (*.f64 phi1 phi1) (neg.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64)) #s(literal 2 binary64))) (fma.f64 (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64))) (*.f64 (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64))) #s(literal 1/2 binary64) (/.f64 #s(literal 1/3 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64))))))) (*.f64 phi1 phi1) (-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64))) (*.f64 (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 phi1 phi1) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(fma.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi1 phi1) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(fma.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi1 phi1) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos lambda1) (cos phi2))))
(fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(fma.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi1 phi1) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda2 lambda1)))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (cos (- lambda2 lambda1))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (cos (- lambda2 lambda1))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(fma.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi1 phi1) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (cos (- lambda1 lambda2)))
(+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(+ 1 (+ (cos (- lambda1 lambda2)) (* -1/2 (pow phi1 2))))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))
(+ 1 (+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi1 phi1) #s(literal 1 binary64)))
(+ 1 (+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi1 phi1) #s(literal -1/2 binary64)) (*.f64 phi1 phi1) #s(literal 1 binary64)))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1)
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal -1 binary64))
(- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow phi1 2)) 1)
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 phi1 phi1 #s(literal -1 binary64)))
(- (+ (* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2)))) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) 1)
(fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/3 binary64) #s(literal 1 binary64)) phi1) phi1 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal -1 binary64)))
(- (+ (* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3)))) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) 1)
(fma.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 2/45 binary64) (*.f64 phi1 phi1) #s(literal -1/3 binary64)) (*.f64 phi1 phi1) #s(literal 1 binary64)) phi1) phi1 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal -1 binary64)))
(- (* (cos phi2) (cos (- lambda2 lambda1))) 1)
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64))
(- (+ (* 1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda2 lambda1)))) 1)
(fma.f64 (*.f64 #s(literal 1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64)))
(- (+ (* (cos phi2) (cos (- lambda2 lambda1))) (* (pow phi1 2) (+ 1/2 (* -1/24 (pow phi1 2))))) 1)
(fma.f64 (*.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64)))
(- (+ (* (cos phi2) (cos (- lambda2 lambda1))) (* (pow phi1 2) (+ 1/2 (* (pow phi1 2) (- (* 1/720 (pow phi1 2)) 1/24))))) 1)
(fma.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/720 binary64) (*.f64 phi1 phi1) #s(literal -1/24 binary64)) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/ 1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))

rewrite699.0ms (3.7%)

Memory
-15.6MiB live, 189.6MiB allocated
Rules
5 786×lower-*.f32
5 774×lower-*.f64
5 238×lower-fma.f32
5 230×lower-fma.f64
3 446×lower-/.f32
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
078561
0128448
1490400
23270400
010295400
Stop Event
iter limit
node limit
iter limit
Counts
29 → 729
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(cos.f64 phi2)
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))))
#s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)))
(pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))
(*.f64 lambda1 lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))
(*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
#s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(cos.f64 (-.f64 lambda2 lambda1))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
Outputs
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>

eval1.1s (5.7%)

Memory
26.4MiB live, 489.9MiB allocated
Compiler

Compiled 80 426 to 5 328 computations (93.4% saved)

prune691.0ms (3.6%)

Memory
-21.5MiB live, 404.6MiB allocated
Pruning

91 alts after pruning (87 fresh and 4 done)

PrunedKeptTotal
New2 125352 160
Fresh335285
Picked235
Done011
Total2 160912 251
Accuracy
99.9%
Counts
2 251 → 91
Alt Table
Click to see full alt table
StatusAccuracyProgram
48.1%
(pow.f64 (pow.f64 (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1/2 binary64)) #s(literal 2 binary64))
22.6%
(pow.f64 (pow.f64 #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal -1 binary64))) #s(literal -1/2 binary64)) #s(literal 2 binary64))
15.9%
(pow.f64 (*.f64 #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal -1 binary64))) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal -1 binary64)))) #s(literal -1/2 binary64))
98.5%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)))
76.7%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) lambda1)))
48.0%
(/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (pow.f64 (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1/2 binary64)) #s(literal -1 binary64))))
13.1%
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 lambda1)) #s(literal -1/2 binary64))))
22.6%
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (pow.f64 lambda1 #s(literal -1/2 binary64)) #s(literal 2 binary64))))
15.5%
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))))
20.8%
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (*.f64 (log.f64 lambda1) #s(literal 2 binary64)))))
51.6%
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)))
8.1%
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (exp.f64 (*.f64 (log.f64 (pow.f64 lambda1 #s(literal 4 binary64))) #s(literal -1/4 binary64)))))
20.8%
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (exp.f64 (*.f64 (log.f64 lambda1) #s(literal -1 binary64)))))
2.6%
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) #s(approx (pow (* lambda1 lambda1) -1/2) (/.f64 #s(literal -1 binary64) lambda1))))
71.5%
(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 (+.f64 phi2 lambda1) lambda2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
71.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (-.f64 (+.f64 phi2 lambda1) lambda2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
86.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi2))) #s(literal 1/2 binary64) (cos.f64 phi1))))
83.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (fabs.f64 (cos.f64 (-.f64 lambda2 lambda1))) (fabs.f64 (cos.f64 phi2)) (cos.f64 phi1))))
76.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1))))))
77.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
76.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
76.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))))
71.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 lambda1 lambda2) phi1) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (+.f64 (-.f64 lambda1 lambda2) phi1) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))))
71.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (sqrt.f64 (cos.f64 phi2)) #s(literal 2 binary64)) (cos.f64 phi1)))))
99.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
77.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) #s(literal 1 binary64)))))
76.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (* (cos lambda2) (sin lambda1)) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
98.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (* (cos lambda2) (sin lambda1)) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
72.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (+.f64 lambda1 lambda2)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
94.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
52.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1/4 binary64)) (sqrt.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3/2 binary64))) (cos.f64 phi1))))
74.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (sqrt.f64 (cos.f64 phi1)) (sqrt.f64 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
66.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (fma.f64 (pow.f64 (sqrt.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)) (cos.f64 phi2) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
93.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (fma.f64 (sqrt.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
81.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (-.f64 lambda2 (-.f64 lambda1 phi2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi1)) (cos.f64 (-.f64 phi1 phi1)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
93.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64)) (+.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))))))
93.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (sqrt.f64 (+.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 (-.f64 lambda2 lambda1) (-.f64 lambda2 lambda1))))) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
66.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (pow.f64 (sqrt.f64 (cos.f64 phi2)) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
93.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (*.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))))
93.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))))
93.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))))
93.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (*.f64 (*.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))))
98.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
98.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
98.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))))
97.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
98.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))))
74.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (exp.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #s(literal -1 binary64))) #s(literal -1 binary64)))))
71.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64))))))
78.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
77.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
97.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (cos.f64 phi1)))))
97.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1)))))
70.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)))))))
66.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64))))))
75.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1))))))
66.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
63.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
63.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64)))))))
56.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
62.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1))))))
62.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 #s(literal 1/24 binary64) (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (*.f64 lambda1 lambda1) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
57.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64))))))
62.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
55.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))))
68.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
65.3%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
57.2%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
64.9%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
76.1%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1)))))
75.3%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
47.9%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))))
72.9%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
76.2%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
97.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
73.6%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (*.f64 (sin.f64 (fma.f64 (/.f64 lambda2 (+.f64 lambda2 lambda1)) lambda2 (*.f64 (/.f64 lambda1 (+.f64 lambda2 lambda1)) lambda1))) (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (fma.f64 (/.f64 lambda2 (+.f64 lambda2 lambda1)) lambda2 (*.f64 (/.f64 lambda1 (+.f64 lambda2 lambda1)) lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
76.5%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
76.1%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))))
71.7%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal -1 binary64)))))
58.5%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (exp.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #s(literal -1 binary64))) #s(literal -1 binary64)))))
74.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
65.0%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
64.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
76.1%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
66.1%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
75.3%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
59.5%
(*.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))) (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)))) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1)))
98.4%
(*.f64 (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal -1 binary64))))
20.8%
(exp.f64 (*.f64 (log.f64 #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal -1 binary64)))) #s(literal -1 binary64)))
45.7%
(exp.f64 (log.f64 (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)))
98.5%
#s(approx (/ 1 (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1))
Compiler

Compiled 8 558 to 2 629 computations (69.3% saved)

regimes440.0ms (2.3%)

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

7 calls:

122.0ms
phi2
62.0ms
lambda2
52.0ms
lambda1
51.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
50.0ms
phi1
Results
AccuracySegmentsBranch
99.6%1lambda1
99.6%1lambda2
99.6%1phi1
99.6%1phi2
99.6%1(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
99.6%1(cos.f64 phi2)
99.6%1(cos.f64 phi1)
Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes288.0ms (1.5%)

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

7 calls:

60.0ms
lambda1
47.0ms
(cos.f64 phi1)
37.0ms
lambda2
35.0ms
phi2
35.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
Results
AccuracySegmentsBranch
98.7%1lambda1
98.7%1lambda2
98.7%1phi1
98.7%1phi2
98.7%1(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
98.7%1(cos.f64 phi2)
98.7%1(cos.f64 phi1)
Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes353.0ms (1.9%)

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

7 calls:

106.0ms
lambda1
48.0ms
(cos.f64 phi1)
47.0ms
phi1
45.0ms
phi2
36.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
Results
AccuracySegmentsBranch
98.7%1(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
98.7%1lambda1
98.7%1lambda2
98.7%1phi1
98.7%1phi2
98.7%1(cos.f64 phi2)
98.7%1(cos.f64 phi1)
Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes252.0ms (1.3%)

Memory
-18.5MiB live, 497.9MiB allocated
Counts
95 → 1
Calls
Call 1
Inputs
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) #s(approx (pow (* lambda1 lambda1) -1/2) (/.f64 #s(literal -1 binary64) lambda1))))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (pow.f64 lambda1 #s(literal -1/2 binary64)) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (exp.f64 (*.f64 (log.f64 lambda1) #s(literal -1 binary64)))))
(pow.f64 (pow.f64 #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal -1 binary64))) #s(literal -1/2 binary64)) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal -1 binary64)))) #s(literal -1 binary64)))
(pow.f64 (*.f64 #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal -1 binary64))) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal -1 binary64)))) #s(literal -1/2 binary64))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (exp.f64 (*.f64 (log.f64 (pow.f64 lambda1 #s(literal 4 binary64))) #s(literal -1/4 binary64)))))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (*.f64 (log.f64 lambda1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 lambda1)) #s(literal -1/2 binary64))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 #s(approx (cos phi2) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (-.f64 (+.f64 phi2 lambda1) lambda2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) lambda1)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) lambda1)))
(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 (+.f64 phi2 lambda1) lambda2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1))) lambda1)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (/ 1 (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (cos (* lambda2 (/ lambda2 (+ lambda2 lambda1))))) (* (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (sin (* lambda2 (/ lambda2 (+ lambda2 lambda1))))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 phi2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 #s(literal 1/24 binary64) (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (*.f64 lambda1 lambda1) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 #s(literal 1/24 binary64) (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (*.f64 lambda1 lambda1) (+.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)))
(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (* (cos lambda2) (sin lambda1)) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (sqrt.f64 (cos.f64 phi1)) (sqrt.f64 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (*.f64 (sin.f64 (fma.f64 (/.f64 lambda2 (+.f64 lambda2 lambda1)) lambda2 (*.f64 (/.f64 lambda1 (+.f64 lambda2 lambda1)) lambda1))) (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (fma.f64 (/.f64 lambda2 (+.f64 lambda2 lambda1)) lambda2 (*.f64 (/.f64 lambda1 (+.f64 lambda2 lambda1)) lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(exp.f64 (log.f64 (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (exp.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #s(literal -1 binary64))) #s(literal -1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1)))))
(pow.f64 (pow.f64 (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1/2 binary64)) #s(literal 2 binary64))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (+.f64 lambda1 lambda2)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 lambda1 lambda2) phi1) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (+.f64 (-.f64 lambda1 lambda2) phi1) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (+.f64 lambda2 lambda1)) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))) lambda1)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (exp.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #s(literal -1 binary64))) #s(literal -1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
Calls

7 calls:

59.0ms
(cos.f64 phi1)
39.0ms
lambda1
33.0ms
phi1
31.0ms
phi2
29.0ms
lambda2
Results
AccuracySegmentsBranch
98.5%1(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
98.5%1lambda1
98.5%1lambda2
98.5%1phi1
98.5%1phi2
98.5%1(cos.f64 phi1)
98.5%1(cos.f64 phi2)
Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes116.0ms (0.6%)

Memory
19.5MiB live, 218.7MiB allocated
Counts
54 → 1
Calls
Call 1
Inputs
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) #s(approx (pow (* lambda1 lambda1) -1/2) (/.f64 #s(literal -1 binary64) lambda1))))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (pow.f64 lambda1 #s(literal -1/2 binary64)) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (exp.f64 (*.f64 (log.f64 lambda1) #s(literal -1 binary64)))))
(pow.f64 (pow.f64 #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal -1 binary64))) #s(literal -1/2 binary64)) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal -1 binary64)))) #s(literal -1 binary64)))
(pow.f64 (*.f64 #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal -1 binary64))) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal -1 binary64)))) #s(literal -1/2 binary64))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (exp.f64 (*.f64 (log.f64 (pow.f64 lambda1 #s(literal 4 binary64))) #s(literal -1/4 binary64)))))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (*.f64 (log.f64 lambda1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 lambda1)) #s(literal -1/2 binary64))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 #s(approx (cos phi2) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (-.f64 (+.f64 phi2 lambda1) lambda2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) lambda1)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) lambda1)))
(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 (+.f64 phi2 lambda1) lambda2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1))) lambda1)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
Calls

7 calls:

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

Compiled 28 to 40 computations (-42.9% saved)

regimes163.0ms (0.9%)

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

7 calls:

31.0ms
phi2
31.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
31.0ms
(cos.f64 phi1)
28.0ms
lambda2
13.0ms
phi1
Results
AccuracySegmentsBranch
80.2%2lambda1
87.6%3lambda2
90.3%2phi1
87.4%2phi2
90.1%4(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
87.4%2(cos.f64 phi2)
90.4%2(cos.f64 phi1)
Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes38.0ms (0.2%)

Memory
-28.0MiB live, 29.1MiB allocated
Counts
37 → 2
Calls
Call 1
Inputs
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) #s(approx (pow (* lambda1 lambda1) -1/2) (/.f64 #s(literal -1 binary64) lambda1))))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (pow.f64 lambda1 #s(literal -1/2 binary64)) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (exp.f64 (*.f64 (log.f64 lambda1) #s(literal -1 binary64)))))
(pow.f64 (pow.f64 #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal -1 binary64))) #s(literal -1/2 binary64)) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal -1 binary64)))) #s(literal -1 binary64)))
(pow.f64 (*.f64 #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal -1 binary64))) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal -1 binary64)))) #s(literal -1/2 binary64))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (exp.f64 (*.f64 (log.f64 (pow.f64 lambda1 #s(literal 4 binary64))) #s(literal -1/4 binary64)))))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (*.f64 (log.f64 lambda1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 lambda1)) #s(literal -1/2 binary64))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 #s(approx (cos phi2) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (-.f64 (+.f64 phi2 lambda1) lambda2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
Outputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
Calls

2 calls:

25.0ms
(cos.f64 phi1)
11.0ms
phi1
Results
AccuracySegmentsBranch
88.0%2phi1
88.1%2(cos.f64 phi1)
Compiler

Compiled 3 to 9 computations (-200% saved)

regimes90.0ms (0.5%)

Memory
1.1MiB live, 72.5MiB allocated
Counts
31 → 2
Calls
Call 1
Inputs
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) #s(approx (pow (* lambda1 lambda1) -1/2) (/.f64 #s(literal -1 binary64) lambda1))))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (pow.f64 lambda1 #s(literal -1/2 binary64)) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (exp.f64 (*.f64 (log.f64 lambda1) #s(literal -1 binary64)))))
(pow.f64 (pow.f64 #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal -1 binary64))) #s(literal -1/2 binary64)) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal -1 binary64)))) #s(literal -1 binary64)))
(pow.f64 (*.f64 #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal -1 binary64))) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal -1 binary64)))) #s(literal -1/2 binary64))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (exp.f64 (*.f64 (log.f64 (pow.f64 lambda1 #s(literal 4 binary64))) #s(literal -1/4 binary64)))))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (*.f64 (log.f64 lambda1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 lambda1)) #s(literal -1/2 binary64))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 #s(approx (cos phi2) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) #s(approx (+ (* (sqrt (* (cos (- lambda2 lambda1)) (cos phi2))) (sqrt (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
Calls

5 calls:

47.0ms
phi1
14.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
9.0ms
phi2
9.0ms
(cos.f64 phi1)
9.0ms
(cos.f64 phi2)
Results
AccuracySegmentsBranch
84.4%4(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
86.2%2(cos.f64 phi2)
86.0%2phi2
76.9%1phi1
78.4%2(cos.f64 phi1)
Compiler

Compiled 26 to 32 computations (-23.1% saved)

regimes10.0ms (0.1%)

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

1 calls:

8.0ms
(cos.f64 phi2)
Results
AccuracySegmentsBranch
86.2%2(cos.f64 phi2)
Compiler

Compiled 2 to 5 computations (-150% saved)

regimes34.0ms (0.2%)

Memory
8.6MiB live, 43.8MiB allocated
Counts
25 → 2
Calls
Call 1
Inputs
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) #s(approx (pow (* lambda1 lambda1) -1/2) (/.f64 #s(literal -1 binary64) lambda1))))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (pow.f64 lambda1 #s(literal -1/2 binary64)) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (exp.f64 (*.f64 (log.f64 lambda1) #s(literal -1 binary64)))))
(pow.f64 (pow.f64 #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal -1 binary64))) #s(literal -1/2 binary64)) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal -1 binary64)))) #s(literal -1 binary64)))
(pow.f64 (*.f64 #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal -1 binary64))) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal -1 binary64)))) #s(literal -1/2 binary64))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (exp.f64 (*.f64 (log.f64 (pow.f64 lambda1 #s(literal 4 binary64))) #s(literal -1/4 binary64)))))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (*.f64 (log.f64 lambda1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 lambda1)) #s(literal -1/2 binary64))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 #s(approx (cos phi2) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
Calls

3 calls:

16.0ms
lambda2
8.0ms
phi2
7.0ms
(cos.f64 phi2)
Results
AccuracySegmentsBranch
81.3%2phi2
76.1%1lambda2
82.0%2(cos.f64 phi2)
Compiler

Compiled 4 to 13 computations (-225% saved)

regimes12.0ms (0.1%)

Memory
-34.2MiB live, 18.6MiB allocated
Counts
20 → 2
Calls
Call 1
Inputs
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) #s(approx (pow (* lambda1 lambda1) -1/2) (/.f64 #s(literal -1 binary64) lambda1))))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (pow.f64 lambda1 #s(literal -1/2 binary64)) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (exp.f64 (*.f64 (log.f64 lambda1) #s(literal -1 binary64)))))
(pow.f64 (pow.f64 #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal -1 binary64))) #s(literal -1/2 binary64)) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal -1 binary64)))) #s(literal -1 binary64)))
(pow.f64 (*.f64 #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal -1 binary64))) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal -1 binary64)))) #s(literal -1/2 binary64))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (exp.f64 (*.f64 (log.f64 (pow.f64 lambda1 #s(literal 4 binary64))) #s(literal -1/4 binary64)))))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (*.f64 (log.f64 lambda1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 lambda1)) #s(literal -1/2 binary64))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 #s(approx (cos phi2) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
Calls

1 calls:

6.0ms
(cos.f64 phi2)
Results
AccuracySegmentsBranch
81.8%2(cos.f64 phi2)
Compiler

Compiled 2 to 5 computations (-150% saved)

regimes48.0ms (0.3%)

Memory
11.2MiB live, 83.2MiB allocated
Counts
18 → 1
Calls
Call 1
Inputs
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) #s(approx (pow (* lambda1 lambda1) -1/2) (/.f64 #s(literal -1 binary64) lambda1))))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (pow.f64 lambda1 #s(literal -1/2 binary64)) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (exp.f64 (*.f64 (log.f64 lambda1) #s(literal -1 binary64)))))
(pow.f64 (pow.f64 #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal -1 binary64))) #s(literal -1/2 binary64)) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal -1 binary64)))) #s(literal -1 binary64)))
(pow.f64 (*.f64 #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal -1 binary64))) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal -1 binary64)))) #s(literal -1/2 binary64))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (exp.f64 (*.f64 (log.f64 (pow.f64 lambda1 #s(literal 4 binary64))) #s(literal -1/4 binary64)))))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (*.f64 (log.f64 lambda1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 lambda1)) #s(literal -1/2 binary64))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 #s(approx (cos phi2) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))))
Outputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
Calls

7 calls:

9.0ms
lambda2
8.0ms
(cos.f64 phi1)
6.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
6.0ms
phi2
6.0ms
phi1
Results
AccuracySegmentsBranch
75.3%1lambda2
75.3%1phi1
75.3%1(cos.f64 phi1)
75.3%1lambda1
75.3%1phi2
75.3%1(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
75.3%1(cos.f64 phi2)
Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes34.0ms (0.2%)

Memory
11.1MiB live, 96.6MiB allocated
Counts
10 → 1
Calls
Call 1
Inputs
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) #s(approx (pow (* lambda1 lambda1) -1/2) (/.f64 #s(literal -1 binary64) lambda1))))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (pow.f64 lambda1 #s(literal -1/2 binary64)) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (exp.f64 (*.f64 (log.f64 lambda1) #s(literal -1 binary64)))))
(pow.f64 (pow.f64 #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal -1 binary64))) #s(literal -1/2 binary64)) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal -1 binary64)))) #s(literal -1 binary64)))
(pow.f64 (*.f64 #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal -1 binary64))) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 lambda1 #s(literal -1 binary64)))) #s(literal -1/2 binary64))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (exp.f64 (*.f64 (log.f64 (pow.f64 lambda1 #s(literal 4 binary64))) #s(literal -1/4 binary64)))))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (*.f64 (log.f64 lambda1) #s(literal 2 binary64)))))
Outputs
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)))
Calls

7 calls:

8.0ms
phi2
5.0ms
(cos.f64 phi2)
4.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
4.0ms
lambda1
4.0ms
phi1
Results
AccuracySegmentsBranch
51.6%1lambda2
51.6%1phi2
51.6%1(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
51.6%1phi1
51.6%1(cos.f64 phi2)
51.6%1(cos.f64 phi1)
51.6%1lambda1
Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes11.0ms (0.1%)

Memory
-0.3MiB live, 37.7MiB allocated
Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

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

7 calls:

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

Compiled 28 to 40 computations (-42.9% saved)

bsearch1.0ms (0%)

Memory
2.2MiB live, 2.2MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.9617149213245918
0.9641540591806743
Compiler

Compiled 23 to 21 computations (8.7% saved)

bsearch0.0ms (0%)

Memory
2.0MiB live, 2.0MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.9617149213245918
0.9641540591806743
Compiler

Compiled 23 to 21 computations (8.7% saved)

bsearch0.0ms (0%)

Memory
1.9MiB live, 1.9MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.9797122997954885
0.9802135987889046
Compiler

Compiled 22 to 21 computations (4.5% saved)

bsearch0.0ms (0%)

Memory
1.8MiB live, 1.8MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.9797122997954885
0.9802135987889046
Compiler

Compiled 22 to 21 computations (4.5% saved)

bsearch0.0ms (0%)

Memory
1.5MiB live, 1.5MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.004001571252122207
0.006003916888825743
Compiler

Compiled 22 to 21 computations (4.5% saved)

bsearch1.0ms (0%)

Memory
1.6MiB live, 1.6MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.6241144868420871
0.6624389600024467
Compiler

Compiled 22 to 21 computations (4.5% saved)

simplify30.0ms (0.2%)

Memory
13.7MiB live, 89.4MiB allocated
Algorithm
egg-herbie
Rules
40×+-commutative-binary64-+.f64
20×*-commutative-binary64-*.f64
10×sub-neg-binary64-neg.f64-+.f64--.f64
neg-sub0-binary64--.f64-neg.f64
neg-mul-1-binary64-*.f64-neg.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0126690
1157690
2165690
3170690
4172690
Stop Event
saturated
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (* (cos lambda2) (sin lambda1)) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(if (<=.f64 (cos.f64 phi1) #s(literal 4332462841530417/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(if (<=.f64 (cos.f64 phi1) #s(literal 4332462841530417/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(if (<=.f64 (cos.f64 phi2) #s(literal 2206763817411543/2251799813685248 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (<=.f64 (cos.f64 phi2) #s(literal 2206763817411543/2251799813685248 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))))
(if (<=.f64 (cos.f64 phi2) #s(literal 5764607523034235/1152921504606846976 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))))
(if (<=.f64 (cos.f64 phi2) #s(literal 5854679515581645/9007199254740992 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) #s(approx (pow (* lambda1 lambda1) -1/2) (/.f64 #s(literal -1 binary64) lambda1))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (* (cos lambda2) (sin lambda1)) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (* (cos lambda2) (sin lambda1)) (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) lambda1)
(if (<=.f64 (cos.f64 phi1) #s(literal 4332462841530417/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(if (<=.f64 (cos.f64 phi1) #s(literal 4332462841530417/4503599627370496 binary64)) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) lambda1))
(if (<=.f64 (cos.f64 phi1) #s(literal 4332462841530417/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(if (<=.f64 (cos.f64 phi1) #s(literal 4332462841530417/4503599627370496 binary64)) (+.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) lambda1) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) lambda1))
(if (<=.f64 (cos.f64 phi2) #s(literal 2206763817411543/2251799813685248 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (<=.f64 (cos.f64 phi2) #s(literal 2206763817411543/2251799813685248 binary64)) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))) lambda1) (+.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) lambda1))
(if (<=.f64 (cos.f64 phi2) #s(literal 2206763817411543/2251799813685248 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))))
(if (<=.f64 (cos.f64 phi2) #s(literal 2206763817411543/2251799813685248 binary64)) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))) lambda1) (+.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) lambda1))
(if (<=.f64 (cos.f64 phi2) #s(literal 5764607523034235/1152921504606846976 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))))
(if (<=.f64 (cos.f64 phi2) #s(literal 5764607523034235/1152921504606846976 binary64)) (+.f64 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))) lambda1) (+.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) lambda1))
(if (<=.f64 (cos.f64 phi2) #s(literal 5854679515581645/9007199254740992 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))))
(if (<=.f64 (cos.f64 phi2) #s(literal 5854679515581645/9007199254740992 binary64)) (+.f64 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))) lambda1) (+.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) lambda1))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) lambda1)
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) (/.f64 #s(literal 1 binary64) lambda1)))
(/.f64 #s(literal 1 binary64) #s(approx (/ 1 (+ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1)) #s(approx (pow (* lambda1 lambda1) -1/2) (/.f64 #s(literal -1 binary64) lambda1))))

soundness1.7s (9%)

Memory
-29.4MiB live, 1 083.5MiB allocated
Rules
14 730×lower-fma.f64
14 730×lower-fma.f32
14 638×lower-fma.f64
14 638×lower-fma.f32
10 792×lower-fma.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
066535
0122445
1436348
23382348
09111348
02303176
16833129
219003074
337623074
085052880
071457
0119419
1399335
22638335
09076321
096624286
1301823757
0880022696
0116626458
1359625888
0917424919
061518323
1193017734
2562017707
0803616652
01463
02463
18263
257463
3689963
0844260
Stop Event
fuel
iter limit
node limit
iter limit
iter limit
node limit
iter limit
node limit
iter limit
node limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
node limit
iter limit
Compiler

Compiled 1 149 to 608 computations (47.1% saved)

preprocess165.0ms (0.9%)

Memory
17.5MiB live, 174.5MiB allocated
Remove

(abs phi1)

(abs phi2)

Compiler

Compiled 1 764 to 774 computations (56.1% saved)

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

Profiling

Loading profile data...